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A PRIMEIRA REVISTA BRASILEIRA DE MICROCOMPUTADORES 
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TRANSFERENCE DIALETOS DO ACENTUACAO 
DEARQUIVOS BASIC:QUE TAL NOS MICROS 

DO VISICALC TRADUZIR ? TRS - APPLE 
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Impressoras GRAFIX 

a tecnologia mais vendida no mundo. 



GRAFIX 100 



GRAFIX 80 



Principais Caracterfsticas - GRAFIX 80/100 

M6todo de ImpressSo Impacto por Matriz de Pontos 

Direpao de ImpressSo Bidirecional com busca I6gica 

N.° de agulhas na Cabepa ... 9 

Matriz 9x9 

MTBF da Impressora 5.000.000 linhas 

Conjunto de Caracteres 255 caracteres ASC II 

Interface Paralela tipo Centronics 

Modos de ImpressSo Normal, Duplo, Enfatizado, e 

Duplo Enfatizado. 

Modo Grafico “Bit -Image” 

Numero de Cdpias Urn original mais duas cbpias 

Voltagem 1 1 0 ou 220 V - 49,5 a 60 Hz 



EspecificagOes 


GRAFIX 80 


GRAFIX 100 


Velocidade de ImpressSo 


. 100 cps 


100 cps 


Largura do Papel 

Colunas 


. 4 a 1 0 pol. 


4 a 15V2 pol. 


Normal 


. 80 


136 


Dupla Largura 


. 40 


68 


Comprimida 


. 132 


233 


Dupla largura Comprimida . . 


,. 66 


116 


Altura 


. 107 mm 


133 mm 


Largura 


. 374 mm 


592 mm 


Profundidade 


. 305 mm 


393 mm 


Peso 


• 5,5 kg 


10 kg 
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As impressoras GRAFIX 80/100 oferecem dezenas de combinagOes tipogr&ficas possiv6is e, capacidade 
gr£fica para a impressao de desenhos, gr^ficos e imagens de alta resolugSo (120 pontos por polegada). 



fabricadas por Impressora Grafix 80 e Grafix 100, s*rie MX. 

A soluc&o definitiva para os fabricantes de microcomputadores que 

SCRITTA Eletronica Ltda. queiram fomecer seus equipamentos em configurapSo compleia. 

Al. Amazonas, 832 • Alphaville - Barueri - SP • CEP 06400 • Tel.: (011) 421-3422 - Telex: (01 1) 31029 - SCTT-BR. 
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Editorial 

N esta edtgSo abordaremos alguns as - 
pectos da compatibilidade , um tema 
essencial, principal mente aqui em nosso 
mercado aonde imperam as dificuldades de 
comuni capao. 

A compatibilidade , a primeira vista , sd 
traz beneffcios: permite o intercimbio de 
software e hardware periferico; a interliga- 
gao de m&quinas em rede e. especial men te, o 
aproveitamento do trabalho e investimento 
f dispendidos na bora em que se quer trocar 
ou uti/izar temporariamente outro equipa- 
mento. £ o caso, por exemplo, da util izacao 
de arquivos de um software em maquinas de 
diferentes linhas. Sob re este ass unto, de uma 
olhada na solugao encontrada por nossos co- 
la bo radores Jos6 Carlos Niza e Ronaldo Gis- 
mondi para transferir arquivos do Visicalc 
entre equipamentos compatfveis com Apple 
e TRS-80. 

Da mesma forma, compatibilizar lingua- 
gens seria um importante passo no sentido 
de popularizar a operagao dessas mjqumas: 
j£ imaginou nao sd poder usar uma enorme 
biblioteca de programas como tambem saber 
programar com igual desen voltura qua! quer 
micro que I he cafsse as maos? Bern, en quan- 
to nossa realidade nao 4 a do padrao e sim 
da prohferagao de di a let os, os usudrios vao 
se virando como podem: Maria Sylvia 
Abaurre, por exemplo, encontrou na tradu- 
ce o um meio razoavel de utilizer, em seu 
Commodore, programas para outras linhas 
de equipamentos. 

Mas 6 na hora de adapter as mdqumas ao 
mercado bras i lei ro sem, contudo, descar ac • 
terizd-las em suas compatibilidades iniciais 
que a coisa se complica. Veja a mar a to na 
que 4, e o troca troca de EPROMs que en- 
voi ve, a "opera cao" de do tar um micro — 
Apple ou T RS — de condi goes para falar um 
portuguSs decente na materia "Acentuagao 
nos micros nacionais". 

Se formos parar para refletir mais seria- 
mente sobre esta situagao, veremos que es ta- 
rn os nos per den do em detalhes verdadeira- 
mente absurd os. como fazer com que um 
TK-85 possa utilizar um periferico do 
CP-200, ou que um Apple-like possa usar 
uma placa de outro Apple-like O que deveria 
ser natural torna-se, por vezes, excepcional- 
mente diffcil. Triste quadro: en quanto nos 
EUA discute-se os merit os exatos da compa- 
tibilidade fexiste uma cor rente de analistas 
que alega que a padroni zagao dela decor ren- 
te inibe a exploragao real das potencialida- 
des especffices de cada mdquina), aqui no 
Brasil ainda tratamos de compatibilizar os 
compatfveis entre si e, o que e pior, com 
seus compatfveis originais. 



O ACENTUAQAO NOS MICROS NACIONAIS - Artigo de Jose 
O Maria de Carvalho e Fabio Taveira Valadao sobre as vantagens dos 
sistemas que permitem acentuacao no video e impressora, e as 
opcoes existentes em nosso mercado. 



M COMPATIBILIZE SEUS ARQUIVOS VISICALC - Neste artigo, 
nossos colaboradores Jose Carlos Niza e Ronaldo Curi Gismondi 
relatam sua experiencia, bem sucedida, em transferir dados de 
arquivos entre micros Apple e TRS. 



DIALEiTOS BASIC — Artigo de Maria Sylvia Marques Abaurre 
contendo dicas para traducao de programas entre micros das linhas 
Apple, TRS-80, Sinclair e Commodore. 



Of) CRIPTOARITMETICA — Programa de Jorge Alberto Correia 
/ Bittencourt Soares, para a linha Sinclair. 

Af) CAMUFLANDO PROGRAMAS 

*T\J — Artigo de Celso Bressan. 

/\/\ ESTATISTICA APLICADA III — Serie de artigos e programa de 
Raul Udo Christmann, para a linha Sinclair. 

C/l APPLE: 0 MAPA DA ROM (III) - Artigo de Aldo Felicio Naletto 
Junior. 



BANCO DE SOFTWARE 

54 MISSAO IMPOSSIVEL 
58SUBMARINOS EM AQAO 



SECOES 



4 CARTAS 


39 MS RESPONDE 


64 RODADA MS 


18 BITS 


48 INICIANTE 


68 DICAS 



CAPA; Claudio Jose Costa 
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O sorteado deste mes, que recebera uma 
assinatura anual da revista MICRO 
SISTEMAS, 6 Fernando Brasil Sales, de 
Fortaleza - Ceara. 
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SUGESTOES 



Sou usuSrio de um CP-300 e f§ n? 1 de 
MICRO SISTEMAS. Sugiro que publiquem 
mais jogos e utilitdrios (como o Copsys e o 
6timo Quasar). Gostaria ainda que publicas- 
sem um mapa da ROM, a exemplo dos \4 
publicados para outras linhas de equipamen- 
tos. 

Fernando Brasil Sales 
Fortaleza - CE 



APPLE CLUB 



Tem esta a final idade de parabeniz^-los 
pela materia publicada em MS n? 43, com 
o tftulo de "Va procurar sua turma em um 
clube de micros", que proporcionou aos 
usu^rios saber da existgncia destes clubes. 

Queremos ainda informar aos leitores, 
que devido a ma utilizagSo, por parte de 
alguns sbcios, dos programas por n6s em- 
prestados em perfeitas cordigdes de uso e 
que, na ocasigSo da devolugSo, constata- 
mos estarem danificados, decidimos, a par- 
tir do m§s de maio/85, n§o mais trabalhar 
com empr6stimos, mudando desta maneira, 
a cobranga de taxa de Cadastro de Sbcio e 
os valores logicamente devidos pela aquisi- 
gao de programas. 

Valmir Garbin 
Diretor/Apple Magic Club 
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TK 85 COM EPSON 



Sou possuidor de um TK-85 e recente- 
mente adquiri uma interface de impressora 
paralela fabricada pela Microdigital. 

Como utilizo uma impressora EPSON 
cujos caracteres e instrucQes se baseiam no 
codigo ASCII, gostaria de saber sea interface 
permite o acesso aos caracteres de nP ASCII 
128 a 255, pois ha necessidade deles para 
utilizar o potencial grafico da impressora 
assim como algumas instrugOes de tabula- 
gao. O folheto que acompanha a interface a 
omisso a esse respeito. Em caso negativo, a 
possi'vel fazer alguma adaptag£o? 

Luiz Mamede G. MagalhSfes 
Rio de Janeiro - RJ 

De a cor do com nosso procedi men to ha- 
bitual, remetemos sua per gun ta J Micro- 
digital: 

"Para utihzacSo de uma impressora no 
equipamento TK-85 6 necessdrio a utiliza- 
qao de uma interface para impressora, ten do 
as seguintes especificaqdes: Paralela; Padrao 
Centronics. 

Esta interface permite acesso aos carac- 
teres ASCII de 0 a 127, sen do estes rep re- 
sen tados na impressora. Os caracteres 128 a 
255 sSo caracteres grdficos do equipamento 
TK-85, portanto estes caracteres sSo pr6 - 
prios da ROM do computador. Sen do estes 
n§o reconhecidos pela impressora devido ao 



seu sistema, que entende estes (caracteres 
grificos) como caracteres de contro/e. Ou 
seja, os caracteres ASCII de 128 a 255 nSo 
sSo codificados pela impressora, portanto 
nSo a possi'vel fazer a adaptaqSo para estes 
caracteres devido 4s razOes acima citadas." 
Ricardo Tondowski 
Assessor da Diretoria da Microdigital 



AUTCAT/BAS 



Atravds da reclamag£o de um leitor pau- 
lista, verifiquei que o programa AUTCAT/ 
BAS (MS n? 38, p. 69), apresentava proble- 
mas quando da execug§o de certos progra- 
mas. Exemplificando, citou o SARGON/ 
CMD que apresentava um cursor piscante 
na tela, o que n£o a prOprio desse jogo. 

Identifiquei esse problema, como sendo 
um resTduo do comando CMD"D:0". E, 
para solucionar, criei uma nova linha que de- 
vera ser inserida no programa AUTCAT/ 
BAS: 

1370 DEFUSR = 105 : X = USR (0) 

Esta linha ciiama a rotina $INITIO, 
no enderego decimal 105 da ROM, para re- 
tornar todas as entradas/safdas as suas con- 
digdes iniciais, o que faz desaparecer o pro- 
blema. 

Ari Morato 
Ipatinga - MG 



SPEAK & SPELL 
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Gostaria de me comunicar com algu^m 
que conhega bem o aparelho Speak & 
Spell, fabricado pela Texas Instruments. 
Meu enderego e: Rua Maria Custodia, 38 
- CEP 02460 - Sao Paulo- SP. 

S6rgio Augusto da Costa 
S5o Paulo -SP 



GEOGRAFIA NO MICRO 



Como professor, adquiri recentemente 
um TK 85, e de forma prim^ria, tenho feito 
programas na £rea de Geografia, a qual 
leciono. 

Gostaria de contar com apoio dos cole- 
gas que ja elaboraram programas nesse setor, 
e se possi'vel trocar id6ias com o fim de aper- 
feigoamento. Meu enderego 6: Rua C n? 1 1 
— Jardim Marialda — CEP 06730. 

Avelino de Oliveira 
Vargem Grande Paulista - SP 



TECLADOS SPEED 



Gostaria de parabenizar a firma Speed 
Eletro Eletrdmca de Contagem - MG, pelo 
excelente produto por eles fabricado (tecla- 
do para linha Sinclair). (...) Adquiri um que 
funciona com perfeig£o, por6m a Speed po- 
deria melhorar o manual de instalagSo, que 
n5o condiz com o excelente material pro- 
duzido pela firma. 

Henrique O. E. Ammirabile 
Brasi lia - DF 



Envie suas corresponddncias para: ATI — 
Andlise, Teleprocessamento e Informitica 
Editora Ltda., Av. Presidente Wilson, 
165/gr. 1210, Centro, Rio de Janeiro/RJ, 
CEP 20030, Segao Cartas/ Red agao 
MICRO SISTEMAS. 
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XT 2002 



0 CENTRO DAS ATENQOES EM 
TODOS OS AMBIENTES 

PARA AMBIENTES MULTIFUNCIONAIS QUE DEPENDAM DE MAIOR NUMERO DE SLOTS LIVRES E 
PARA USUARIOS COM MAIOR NECESSIDADE DE CAPACIDADE DE ARMAZENAMENTO 0 XT2002 
DA MICROTEC E A SOLUCAO EM TERMOS DE "PC-COMPATIVEL‘. SEUS OITO SLOTS E 0 
ARMAZENAMENTO DE 10 OU 20 MBYTES NOS DISCOS WINCHESTER EMBUTIDOS. FAZEM DO 
XT2002 A BASE PARA SEUS PROJETOS PRESENTES E FUTUROS. TESTADO E APROVADO POR 
INUMERAS EMPRESAS, 0 XT2002 ESTA DISPONIVEL NA COMPUMICRO PARA PRONTA ENTREGA, 
COM OS MELHORES PRECOS DO MERCADO E ASSISTENCIA TECNICA EM TODO 0 PAIS. NA 
COMPUMICRO, ALEM DO HARDWARE, VOCE ENCONTRA TODA A LINHA DE SOFTWARE DA 
MICROSOFT, ASTHON-TATE, MICROPRO E 0 OPEN-ACESS DA SPA. 



OUTRQS PRODUTOS DE NOSSA LINHA (VENDA OU AUJGUEL] 



MICROCOMPUTADORES 



PC 2001 
NEXUS 1600 
NEXUS 1684 
UNITRON AP/TI 
MICROENGENHO 



EXPANSOES — 16 BITS 



EXP MEMORIA [0-512K] 
COPROCESSADOR 8087 
PLACA INCOX 
PLACA MCOX 
PLACA MULTIUSUARIO 
PLACA COM-R (RJE) 

PLACA MRL 
PLACA MCR-3 
PLACA MPS 



IMPRESSORAS 



MONICA/MONICA PLUS 

EMILIA 8035 

ALICE 

GRAFIX MX80/MX100 
MT200/MT250/MT440* 
IMPRESSORAS DE LINHA 
300 A 1000 LPM 

* grAfica E CORES 



TEPMINAIS 



T2000 [ASSI’NCRONO] 
LINHA SCOPUS (*] 
TVA2170 
TVA3178 

TVA 3378 APL/C/SP 
TVA 3379 

* SOMENTE ALUGUEL 



carpu a© 

INFORMATICA EMPRESARIAL LTDA 



RUA SETE DE SETF.MBRO 99 II ANDAR 
TEL PABX (021) 224 /007 CEP 20050 RIO DE JANEIRO RJ 



ATI Producdo 










0,4 KVA 



Digitacao nao e 
mais problema 



Assinante 
Aproveiteseu 

desconto de w 



/IdS 



list 



A 4 S 



save 



/14S 



list 



/IdS 



save 



/IdS 



list 



/IdS 



save 



/IdS 






PEDIDO 



Agora voce n§o precisa mais ficar horas intermin£veis na fren- 
te do micro digitando aquele programa 
legal. A equipe de MS se mobilizou pa- 
ra colocar a sua disposigeio o maior acer- 
vo de programas publicados no Brasil: os 
programas da MICRO SISTEMAS. 

Na revista voce encontra toda a documen- 
tagao necessiria ao aproveitamento dos 
programas; no MS SAVE voce tern o pro- 
grama gravado em uma fita cassete por 
quern sabe o que faz. 

Mas, se voce § daqueles que adora ir al6m, 
ou seja, estudar a estrutura dos programas, 
entao o MS LIST vai Ihe deixar com agua na 
boca. Nele voce tern as listagens em tama- 
nho natural para estud£-las com maior faci- 
lidade. 

Entao confira: MS SAVE e MS LIST, o casal 
do ano. 



r ™ ' D elo C 0 RRE 1 ° 1 ° servi<? °' 

Pego enviarem. P EESjllSt 

» irr$ 8.000 por unid.) 

, crt m-MO- — •> 

ISAS n® P*9 



Estou enviando valor 

nominal d tal de meu pedido. 

correspondente ao w 



Nome 
Enderego. 
Cidade: 
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5 KVA por apenas 723 ORTN’s. 




SISTEMA NO-BREAK 
GUARDIAN 
LINHA ECONOMICA 

ENERGIA A TODA PROVA 



OSistema No Break Guardian Linha 
Economica tem o melhor prego do mercado 
por dois motivos: 

— A alta tecnologia aplicada no seu 
desenvolvimento. 

— A fabricagao prbpria de componentes, 
tais como: transformadores, indutores, cartoes 
impressos e gabinetes. 



Capacidades dispomveis: 

0,25; 0,4; 0,6; 1; 1,5; 2,5; 5; 7,5 e 10 KVA 




GUARDIAN 

EOUIPAMENTOS ELETR0NICOS LTDA. 

Rua Dr. Gamier, 579 - Rocha - CEP 20971 * Rio de Janeiro, RJ 
Tels.: Geral: PABX (021) 261-6458 / Vendas: PABX (021) 201-0195 
Telex (021)34016 

SSo Paulo: Tel.: (011) 270-3175 




MOVEIS FILCRES: 

PROGRAMADOS 
PARA SEU 

MICROCOMPUTADOR. 



A FILCRES desenvolveu uma linha de mbveis 
inteligentes, exclusivos para o uso em inform^tica, 
oferecendo o espago ideal para que seu 
microcomputador opere nas melhores condigoes, 
livre de possiveis adaptagoes. 

Os mbveis FILCRES, albm de serem projetados de 
maneira a proporcionar o m£ximo conforto ao 
operador, apresentam tambbm, design moderno 
e avangado, estrutura de ferro pintado em epoxy 
revestimento em melamina, materiais que asseguram 
maior resistbncia e durabilidade & pega. 

A praticidade dos mbveis FILCRES, irao garantir 

operagoes mais r^pidas e racionais, 

dando ainda ao seu ambiente, urn toque muito especial 







Os micros compativeis com o Apple ou o TRS-80 podem gerar os acentos 
da lingua portuguesa. Compare aqui os varios sistemas disponiveis 



A centuagao nos 
micros nacionais 

Jose Maria de Carvalho e Fabio Taveira Valadao 



A utiliza^ao crescente de micro- 
computadores em Processa- 
mento de Textos forsou o 
mercado brasileiro a evoluir 
e aperfeisoar-se no sentido de adequar 
os equipamentos nacionais — principal- 
mente os compativeis com Apple e TRS- 
80 , largamente utilizados profissional- 
mente - as regras de acentua^ao da lin- 
gua portuguesa. Existem areas onde a 
apiica^o das maquinas na ed^ao de 
textos e particularmente importante, 
por exemplo as areas juridica e editorial, 
e, nesses casos, a obten9ao de textos 
limpos e corretamente acentuados, tan- 
to no video quanto na impressora, e 
obrigatoria. 

Apesar desta necessidade flagrante, 
os fabricantes nacionais de micros das 
Linhas Apple e TRS- 80 , na fase inicial 
de lan9amento de seus produtos, nao 
tiveram a preocupa9§o de implemen- 
tar um sistema de acentua9ao em seus 
modelos. Talvez isto se explique pelos 
custos de desenvolvimento; necessida- 
de de entrada imediata no mercado ou 
mesmo porque os compradores ainda 
nao eram exigentes nesta questao. 

O fato e que os equipamentos fo- 
ram, ent§o, lan9ados totalmente com- 
pativeis com os modelos norte-america- 
nos, que n 5 o apresentavam acentua9<To 
devido ks caracteristicas da lingua in- 
glesa. 

Antes do aparecimento de adapta- 
9$es que possibilitassem a acentua9^o 
nos microcomputadores, para se obter 
textos impressos acentuados fazia-se uso 



de alguns caracteres do codigo ASCII 
(ex.: & , A ,# etc.) como indicatives de 
acentos. Com isto, o texto ficava prati- 
camente ilegfvel no video, apresentan- 
do-se correto apenas quando impresso. 
Tudo isto era obtido gra9as as facilida- 
des que alguns programas processadores 
de textos apresentavam. A desvantagem 
na utiliza9ao deste processo e que ele 
“suja” demasiadamente o video, e com 
isto deixa de realimentar o operador, 
que so vai perceber algum erro apos co- 
pia impressa, o que conduz a um maior 
gasto de tempo. 

Apos uma fase inicial, foi introduzi- 
do no mercado o sistema IVANITA, 
pioneiro na implementa9^o de acentua- 
9^o de lfngua portuguesa em micros da 
linha Apple. O projeto independente, de 
autoria do engenheiro paulista Ivan Na- 
zarenko, serviu de inspira9ao a alguns fa- 
bricantes, que logo a seguir lan9aram 
seus proprios produtos com implemen- 
ta9$es semelhantes ao sistema Ivanita, 
ou mesmo com o proprio, at raves de 
acordos com o produtor. 

Pode-se afirmar mesmo que o apare- 
cimento destas adapta90cs contribuiu 
para uma maior participa9ao da linha 
Apple no mercado, pois era uma op93o 
interessante ao usudrio e, na epoca, ex- 
clusiva para esta classe de equipamentos. 
S6 recentemente foram propostas solu- 
96es para os micros da linha TRS- 80 , 
com a introdu9ffo no mercado do siste- 
ma MULTPRINT. 

Com estes sistemas, que apresentam 



no video e na impressora caracteres 
acentuados, o operador pode ver, direta- 
mente no video, o que esta digitando, 
podendo corrigir seus erros antes de ob- 
ter copia impressa. Estas implementa- 
9oes podem ser exclusivamente solu95es 
de hardware ou um misto de hardware 
e software, como veremos adiante, e 
possuem regras diferenciadas de opera- 
930 na coloca92o dos caracteres acentua- 
dos. Alem disto, diferem no conjunto de 
acentos disponiveis e nos recursos ofere- 
cidos: por exemplo, alguns sistemas per- 
mitem a acentua9ao de letras maiusculas 
apenas no texto impresso, outros nao. 

IMPLEMENT A(^OES 

PARA LINHA APPLE 

Alem dos sistemas que ja vem incor- 
porados em alguns micros da linha (Exa- 
to Pro -CCE; API I T 1 - Unitron ; Craft 
II Plus — Microcraft; Microengenho II - 
Spectrum), existem ainda as implemen- 
ta9<3es indeperrdentes, como as placas 
Ivanita e Multprint, geralmente vendidas 
pelas lojas especializadas. No quadro 1 , 
fazemos uma compara9<fo entre esses di- 
versos sistemas. 

IVANITA 

O sistema Ivanita e composto de uma 
placa que substitui a PROM geradora de 
caracteres do micro e vem acompanhada 
de um software, em disquete, chamado 
DRIVER IVANITA. A placa viabiliza a 
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MAIUSCULAS 
ACENTUADAS 
NA IMPRES- 
SORA 


MINUSCULAS 
ACENIUADAS 
NO vIdbo e 
NA IMPRES- 
SORA 






EXEMPLO DE TEXTO 
NO VIDEO 


EXEMPLO DE TEXTO 
NA IMPRESSORA 


FABRICANTE 


IVANITA 


NAO 


SIM 


SIM 


SIM 


Magic Window e 

Applewriter 

adaptados 


j:]atengao usua- 
r io-:- ccmo *e im 
portante a aoen- 
tuagao. 


AATENQfo usuA- 
RIO A ccmo A e 
iiiportante a 
acentuagao. 


IVANITA 


MJLTPRIfTT 


SIM 


SIM 


m 


NAO 


Qualquer Soft- 
ware, inclusive 
BASIC 


atenqAo usuArio 
como e inpor 
tante a acentua 
<?ao. 


atenqAd usuArio 
ccmo e inpor 
tante a acentua 
gib. 


MICRODESIGN 

informAtica ltda. 


EXATO PRO 


NAO 


SIM 


u 




Programa CCE 
Super Texto 


X atengao usua- 
rio**.* ccmo e im 
portante a acen- 
tuagao. 


AATENQAD USUARIO 
▲ ccmo e inpor 
tante a acentua - 
gao. 


CCE - IND. E COM. 
DE OOMPONENIES 

eletrOnicos LTCft. 


CRAFT II 


NAO 


SIM 


SIM 




Magic Window e 

Applewriter 

adaptados 


;‘:atengao usua- 
rio;!; acmo e im 
portante a acen- 
tuagao. 


aatenqad usuA- 
rio A ccmo A e 
importante a 
acentuagao. 


MICROCRAFT MICRO 
COMPUTADQRES 


UNITRON 
AP II TI 


NAD 




SIM 


NAO 


Magic Window e 
Applewriter 


■ ATENCAO USUARIO 
ccmo e inportante 
a aoentuagao. 


1 ATENCAO USUARIO 
ccmo e inportante 
a acentuagao. 


UNITRON ELEIRONICA 
LTDA. 


MICRO ENGE 

mo 11 


SIM 


SIM 


SIM 


NAO 


Programa Editex 
» da Microarte 


atenqAo usuArio 

ccmo e inportante 
a acentuagao. 


atenqAo usuArio 

ccmo e inportante 
a acentuagao. 


SPECTRUM EQUIPA- 
MENTOS ELETRflNI 
COS LTDA. 


| >: Delimitador . Pon to-de 1 imi tador A 1 espag* 


■ Son acento 









Quadro l 



introdi^ao dos caracteres acentuados no 
video e, para obten^ao desses elementos 
na impressora, o software DRIVER IVA- 
NITA permite a gera 9 ao de um arquivo 
PRINTER DRIVER, que se encarrega 
de compatibilizar a impressora utilizada 
com o sistema (desde que o padrSo do 
periferico esteja previsto no menu do 
DRIVER IVANITA). O arquivo PRIN- 
TER DRIVER, juntamente com um 
editor de textos - Magic Window ou 
Apple Writer possibilita a gera^o de 
textos com acentua^o na impressora. 0 
sistema Ivanita, porem, nao permite a 
acentua^ao em CP/M 80 colunas. 

A unica restr^ao ao sistema e que, 
no vi'deo, e possivel acentuar apenas as 
letras minusculas. A obten^Jo de letras 
maiusculas acentuadas na impressora e 
feita atraves do uso de delimitadores ( , 
aranha) que indicam para a rotina PRIN- 
TER DRIVER quando uma palavra, em- 
bora estando escrita no vi'deo em letras 
minusculas acentuadas, deve ser impres- 
sa em letras maiusculas acentuadas; estes 
delimitadores sao impressos como espa- 
90 s. 

O fabricante, contudo, prepara para 
o mes de julho uma segunda versao da 
placa (Ivanita II), que permitira traba- 
lhar em CP/M 80 colunas, e tambem a 
acentua 9 ao de letras maiusculas no vi- 
deo, eliminando-se o recurso dos delimi- 
tadores. 

MULTPRINT 

O sistema Multprint e o unico que 
nao necessita de software adicional, sen- 
do uma solu 9 §o totalmente de hard- 
ware e, por isto mesmo, compati'vel com 
qualquer programa existente. 

Ele e composto de uma placa, que 



substitui a PROM geradora de caracteres 
do micro, e de um adaptador para im- 
pressora que e ligado externamente en- 
tre o equipamento e o cabo da impres- 
sora e que, fisicamente, tern as di- 
mensOes de um cartucho de videogame. 
Com o Multprint e possivel obter carac- 
teres acentuados maiusculos e minuscu- 
los, sendo o texto do vi'deo igual ao que 
e impresso, isto devido a inexistencia de 
caracteres delimitadores presentes no vi- 
deo. E possivel usar acentua 9 §o em qual- 
quer programa sem necessidade de adap- 
ta 9 < 3 es, mesmo em BASIC. A unica res- 
tri 9 ao e que no programa ou no BASIC 
tenhamos letras minusculas e maiuscu- 
las. 

O Multprint e compati'vel com as im- 
pressoras existentes no mercado que 
possuam caracteres acentuados (Monica* 
Grafix; P-500 e as com padrcTo Embra- 
tel), podendo adaptar-se a qualquer pa- 
dr 2 o por encomenda ao fabricante. O 
sistema e apresentado em duas versOes: 
modelo IC, para uso em 40 colunas; e 
modelo IE, para ser acoplado diretamen- 
le no cartao 80 colunas e uso em CP/M. 

EXATO PRO 

0 sistema adotado pela CCE em seu 
micro tern caracteristicas bastante seme- 
Ihantes ao Ivanita. O Exato Pro possui 
um circuito incorporado ao gerador de 
caracteres que permite a acentua 9 §to, 
sendo vendido juntamente com um edi- 
tor de texto, CCE Super Texto, seme- 
lhante ao Magic Window, atraves do qual 
o usudrio pode obter caracteres acentua- 
dos no video e na impressora. O editor 
de textos da CCE e configuravel a maio- 
ria das impressoras que possuam caracte- 
res acentuados. 



Como no Ivanita, n 2 o e possivel a ob- 
ten 9 ^To de caracteres acentuados maius- 
culos no video, sendo necessario o uso 
de delimitadores no texto. A acentua 9 ^o 
e possivel no vi'deo e na impressora ape- 
nas quando se esta usando o editor CCE 
Super Texto, ou outros programas adap- 
tados, nao sendo possivel o uso de acen- 
tua 9 ao diretamente em programas BA- 
SIC. 

CRAFT II PLUS 

A Microcraft comercializa seus mi- 
crocomputadores com o sistema Ivanita 
incorporado, fomecendo juntamente 
com o manual do micro a documenta- 
9 ao da placa. Portanto, todas as caracte- 
risticas ja descritas para o sistema Ivani- 
ta s§o validas para o Craft II Plus. 

MICRO ENGENHO II 

A software-house Microarte desenvol- 
veu para este micro o programa Editex, 
um editor que permite a acentua 9 ^o de 
letras minusculas e maiusculas no vi'deo 
e na impressora. A acentua 9 ^o 6 seme- 
lhante a de uma maquina de escrever, na 
qual primeiro e teclado o acento deseja- 
do e, em seguida, a letra a ser acentuada. 

O Microengenho II ja e comercializa- 
do com os si'mbolos indicatives dos acen- 
tos impressos no teclado. A acentua 9 <Io, 
contudo, e possiVel apenas com a utili- 
za 9 ao do Editex, que permite, atraves 
de menu, configurar o micro para vdrios 
padrdes existentes nas impressoras do 
mercado. 

APIITI 

0 TI, da Unitron, possui um teclado 
inteligente controlado por microproces- 
sador especi'fico (6504) e que, alem de m 
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Disposifdo dos acentos agudo ( }, grave ( ), circunflexo ■( ) e til f~ ) no teclado do micro APII TI, da Unitron. 




Disposifdo das letras acentuadas no teclado de micros da linha TRS-80 (CP-500; DGT-1 000) para o sistema Multprint. 



outras fun95es (teclas programdveis pelo dr Jo Unitron em sua PROM de caracte- & * @ i \ etc. — para sinais de acentua- 

usuJrio), permite acentuar minusculas res. Para utilizar o APII TI com outro 9^o, de acordo com o padrJo Abicomp). 

no vfdeo e impressora. NJo e possivel a tipo de impressora, faz-se necessario o 

acentua9Jo de maiusculas no vfdeo, uso da interface Graph +, fabricada pela IMPLEMENT A^OES 

alem de nao existir trema (ii). propria Unitron, e do comando especial PARA LINHA TRS -80 

Temos no mercado a impressora Gra- para acentua9Jo CTRL I A (que conver- w 

fix que pode ser adquirida jd com o pa- te determinados caracteres - #;> ; < ; Em rela9Jo & linha TRS- 80 , nJo exis- ab 
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UM PRODUTO 



Rua Intenctencia. 1 65 - Belenzinho * Tel (01 1 ) 291 *8455 
Telex (01 1 ) 23789 - Sao Paulo - SP - Brasil 






CHEGOU MULTILIST 
ESQUEQA 
AFASENEGRA 
DASUAVIDA. 



Multilist e um papel autocopiativo 
para listagem de computadores 
de qualquer porte. Ele e revestido 
com uma camada invisivel 
de corante, suficiente para fazer 
copias limpas, nitidas e legiveis 
em ate tres vias, eliminando o uso 
do carbono intercalado, 
comum nos formularios contfnuos. 
Multilist aumenta a produtividade 
da impressora, simplifica diversas 
etapas apos o processo 
de impressao e reduz o trabalho 
do operador. Esquega a fase 
negra da sua vida. Use Multilist. 
Entre na Era da Informatica. 








NAO DEIXE SEU SOM VIRAR RUIDO 



Um dos componentes mais importantes para 
que seu som n§o vire ruido s3o os cabos 
AUDIOFLEX. Eles s§o fabricados com as 
melhores ntequinas e equipamentos, e sua 
qualidade 6 controlada em toda linha de 
fabricapelo, o que assegura continuidade de 
caracterfsticas el6tricas ao longo de toda linha. 
Os cabos AUDIOFLEX s§o 
produzidos com cobre 
eletrolrtico e polietileno novos - 
nada de materia prima 
recuperada. Sua montagem 6 
tepida e fcicil. S3o fabricados 



di versos tipos e bitolas e seus lances sao 
cortados no comprimento exato. Entretanto, 
o mais importante 6 que os cabos 
AUDIO FLEX s3o fabricados pela KMP - uma 
empresa que utiliza a melhor materia prima, 
pessoal brasileiro altamente especializado e 
tern como ponto principal a qualidade dos 
produtos que fabrica e um 
indice de nacionalizacao de 
quase 100%. Aplique na 
engenharia da KMP. 

Seu som n§o deve virar 
ruido. 



AUDIOFLEX* 



kmP 



Cabos Especiais e Sistemas Ltda. 

BR 116/km 25 - Cx. Postal 146 - 06800 
Embu SP - Tel.: 011/494-2433 Pabx - Telex 
01 1 / 33234 KMPL - BR - Telegramas Pirelcable 



81 




acentuaqAo nos micros nacionais 



tern fabricantes incorporando em seus 
micros facilidades para acentua^o, ha- 
vendo uma op 9 tfo independente disponi- 
vel no mercado, que e o sistema Mult- 
print. Tal sistema para a linha TRS-80 
tern caracteristicas semelhantes A sua 
vers£o para linha Apple, sendo igualmen- 
te composto da placa que substitui a 
PROM de caracteres e do adaptador 
para impressora. 

O texto presente no vi'deo e identico 
ao impresso, com todos os acentos pre- 
vistos no Portugues, em maiusculas e mi- 
nusculas. Tambem na versJo TRS-80, a 
placa Multprint e comercializada em 
duas vers5es: o sistema 1IC, para micros 
compativeis com o modelo III; e o IID, 
compati'vel com o TRS-80 modelo I. 

Uma outra implementa^o simples, 
mas de dificil opera^o, e utilizada pelos 
funciondrios da Embratel ligados a rede 
Ciranda. Utilizando o editor de textos 
Superscript e modificando os conteu- 
dos originais da PROM geradora de ca- 
racteres do micro (CP-500) e da impres- 
sora (Monica), eles conseguem obter 
acentos tanto no video quanto na im- 
pressora. O padrilo utilizado na PROM 
da impressora foi 44 batizado” padrao 
Embratel, e a Elebra fornece impresso- 
ras Monica ja com este padrao para os 
funciondrios da empresa. Emboraaacen- 
tua 9 ao seja de dificil opera^ao, fique 
restrita ao uso do programa Superscripsit 
e altere as caracteristicas originais do 
micro, esta solu^^o e de baixo custo. 

COMPATIBILIDADE 
COM AS IMPRESSORAS 

Com o surgimento dosvarios sistemas 
para acentua^o nos micros fabricados 
no Brasil, o principal problema detecta- 
do foi como compatibilizar tais sistemas 
com as impressoras que existiam no 
mercado. 

O que aconteceu, num primeiro mo- 
mento, foi que, tanto a Unitron, com 
seu micro APII TI, quanto o fabricate 
da placa Ivanita criaram padrOes pr6- 
prios de codigos para caracteres acentua- 
dos, passando, entao, a fornecer PROMs 
para equipar as impressoras. Posterior- 
mente, os fabricantes de impressoras co- 
me^aram a oferecer versOes desses peri- 
fericos compativeis com um ou outro 
sistema. 

Outros fabricantes de micros e pro- 
dutores independentes lan 9 aram seus sis- 
temas de acentua^o, tornando-os com- 
pativeis com os diversos padrOes ja exis- 
tentes no mercado de impressoras (Mi- 
crocraft; Spectrum; CCE e Microdesign, 
fabricate da placa Multprint). 

Podemos identificar, atualmente, 
como principais padrOes de codigos exis- 
tentes no mercado de impressoras: 

- Padrao Ivanita: encontrado em im- 



pressoras Grafix, Elebra, Ecodata e El- 
gin (140L), ou mesmo em outras mar- 
cas adaptadas para funcionarem em mi- 
cros da linha Apple que possuam tal sis- 
tema instalado. 

- Padrao Embratel: encontrado nas im- 
pressoras Monica utilizadas pelos funcio- 
narios da empresa em micros CP-500. 

- Padrao Unitron: encontrado em im- 
pressoras Grafix, podendo ainda serem 
utilizadas, mediante placa Graph + , as 
impressoras da Sistema ou Elebra. 

- Padrao Abicomp: este padrao d uma 
tentativa de padroniza 9 ?o a m'vel nacio- 
nal. Possui um conjunto de caracteres 
acentuados que inclui ate acentos inexis- 
tentes na lingua portuguesa (por exem- 
plo, o 44 fl” do espanhol), para facilitar 
a aceita^o dos produtos nacionais no 
mercado exterior. Pode ser encontrado 
em impressoras Monica. 

Alguns modelos de impressoras nao 
possuem caracteres acentuados e, nesses 
casos, e necessaria a troca da PROM de 
caracteres do periferico. 



CONCLUS0ES 

0 usudrio podera, neste momento, se 
perguntar: qual, afinal, e o melhor siste- 
ma de acentua 9 ao? A resposta vai de- 
pender da aplica 92 o que se queira dar ao 
equipamento; da linha deste e mesmo 
do fator custo. 

Em se tratando da linha Apple, que 
oferece multiplas op9<3es, a decisao fica 
menos obvia. Se voce jd possui um mi- 
cro com sistema incorporado pelo fabri- 
cate, aceite as limita 9 oes porventura 
existentes, visto que ndo vale a pena tro- 
car o sistema, mesmo porque podem 
aparecer problemas de compatibiiidade. 
Jd se voce pensa em comprar um micro 
ou possui um sem sistema de acentua- 
9 do, verifique no quadro 1 a compara- 
9 do entre as varias op 9 oes existentes e 
escolha a que melhor se adapte as suas 
necessidades. 

Para finalizar, e bom salientar que, 
para evitar surpresas, o usuario deve, 
antes de se decidir por algum sistema, 
verificar se a sua impressora tern caracte- 
res acentuados; senao jd deve ir provi- 
denciando, juntamente com a compra 
do sistema escolhido, a adapta 9 do perti- 
nente. 



Jos6 Maria de Carvalho 6 engenheiro e/etrdni- 
co formado pelo I.T.A. e Fabio Valadao 6 en- 
genheiro eletrdnico formado pe/a UNICAMP. 
Ambos trabalham no Centro de Pesquisa e De - 
senvo/vimento da Telebrds, em Campinas , e 
sSo sdcios na empresa Microdesign . 



Afinal 

uma impressora 
que oferece 
preco baixo, 
qualidade, 
cafezinho 



eum 

bom papo. 




A Racimec aprcsenta a Ita. 

E faz questao de mostra-Ia a voce 
pessoalmente. 

De um pulo a Racimec. Com todo 
conforto, voce vai conversar com quern 
mais entende de Ita: os tecnicos da 
Racimec. Com direito a ar refrigerado 
e cafezinho no ponto. 

Mas lembre-se: esta promoqao 
e valida por pouco tempo. Incluindo 
o preqo especial de lanqamento. 

A Ita espera por voce. 

Apareqa. 

*Cabega para 300 milhoes de caracteres. 
100 cps . 132 posi^des, 33 linhas por minuto. 
caracteres semi-graficos e em portugues, 
saida serial paralela. 



Kracimec 

RACO**IZAOO E MECANtfACAO 

Matriz e Fdbrica - Estrada dos Bandcirantes, 
10.710 - Jacarepagud - Tel.: (021) 342-8484 
CEP 22700 - Telex (021) 22618 RRME BR 
Regional Rio - R. Barata Ribeiro. 370/307 
Tel.: (021) 235-1561 - CEP 22040 
Telex (021) 35056 RRME BR 
Regional Sao Paulo - Av. Paulista, 1.471 
conjs. 1.114 at£ 1.1 17 - Tels.: (011) 284-2808 
283-0777 / 283-0969 / 285-2218 - CEP 01311 
Cx. Postal 55051 - Telex (01 1 ) 25920 RRME BR 
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Quantas vezes voce ja pensou em mudar de equipamento e desistiu? 
Que trabalho, nao?! Pois este artigo mostra que migrar para outra 
linha ou apenas trocar arquivos nao e coisa de outro mundo 



Compatibilize seus 
arquivos Visicalc 

Jos4 Carlos Niza e Ronaldo Curi Gismondi 



D os miihares de programas que existem no mercado, 
alguns possuem versoes para mais de uma linha de 
micros. 0 exemplo mais expressivo destes progra- 
mas £ o Visicalc, que i encontrado para as linhas 
TRS-80, Apple e IBM PC. 

Embora o programa tenha a mesma filosofia de funciona- 
mento para os diversos micros, os arquivos por ele gerados s3o 
incompativeis entre si, mesmo porque a formata^ao dos dis- 
quetes dessas tres linhas sSo totalmente diferentes, sendo daf 
impossivel a permuta de disquetes. 

Se o leitor tiver urn compativel com TRS-80 e quiser migrar 
para a linha Apple, ou vice-versa, ou simplesmente trocar ar- 
quivos entre os dois micros, este artigo possivelmente o ajudara 
neste intento. 

Para que a transference dos dados em arquivos se efetue, o 
usuario devera dispor de programas emuladores para cada um 
dos micros que irao se comunicar. Aldm dos dois micros terem 
que possuir a interface RS 232, um fator importante € a cons- 
tru 9 ao do cabo de interconexSo. (Ver box). 

A RS 232-C 

Muito provavelmente, a interface RS 232 £ a ferramenta 
mais poderosa de seu microcomputador. Mas por que isso? E o 
que 6 RS 232? 

Para esclarecer essas e muitas outras perguntas, vamos anali- 
sar alguns conceitos previos. £ bom lembrar que,em MS n?42, 
num excelente artigo de Roberto Quito Sant’Anna, as interfa- 
ces RS 232 s2o abordadas com bastante profundidade e, sem 
duvida, sua leitura trara um grande embasamento para todo lei- 
tor que quer se aprofundar no assunto. 

Dentro de qualquer computador, existe um grande numero de 
componentes eletronicos que se comunicam entre si. £ atrav^s 
desta intercomunica^ao, e atrav^s de sinais, que o computador 
esti apto a executar determinadas fun^Oes. Vamos dar um 
exemplo: o microcomputador se comunica com as memdrias 
atrav^s de inumeras linhas (endere 90 s e dados). Como hi ne- 
cessidade de grande velocidade e quantidade de informa 90 es, 
esta comunica 9 ao 6 feita atrav^s de linhas em paralelo, otimi- 
zando, assim, todo o processo. 

Este raciocfnio e vdlido para a comunica 9 §[o do micro com 
o mundo exterior. Assim um micro pode comunicar-se com 
uma impressora atrav^s de vdrias linhas (cabo paralelo), num 



processo chamado de comunica 9 ao paralela. A mais comum e a 
do tipo Centronics, e podemos dizer quequase todososcompu- 
tadores do mercado estSo aptos a us^-la. Ha, pordm, varias des- 
vantagens neste tipo de comunica 9 ao, sendo a principal o fator 
distancia: um cabo de grandes diinensOes (maior que tres me- 
tros) fatalmente atenuara o sinal, nSo se prestando para cornu- 
nica95es a maiores distancias. 

Dai haver um segundo meio de propaga 9 ao de informa95es; 
a comunica 9 ao serial. Como o pr6prio nome sugere, os dados 
seguem em s^rie, atrav^s de um cabo, ate seu destino. Como 
no exemplo acima, a liga 9 ^o micro-impressora pode ser feita 
atraves de uma comunica 9 ao serial, com algumas vantagens. 
Mas nem tudo ^ lucro, pois normalmente este tipo de liga 9 <fo e 
mais dificil e precisa de um software de apoio. 

Uma das grandes vantagens da comunica 92 o serial 6 poder- 
se utilizar meios j^i existentes (como o telefone), para se ligar 
dois ou mais micros. 
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um componente (UART) que transforms estes dados paralelos 
em seriais. 

Cada bit 6 transmitido atrav^s de uma linha e na realida- 
de, um impulso eletrico que sera recebido pelo receptor, na 
outra extremidade, que dever£ saber interpreta-lo. Esta sincro 
niza^o transmissor/receptor pode ser de dois tipos: assincrona 
ou sfncrona. 

A maioria dos m ic roc ompu tad ores usa a opera 9 ao assincro- 
na, e 6 dela que nos ocuparemos. Observe abaixo: 

Start Bit Parity Bit 

Stop Bit 

1 I | 

0 0 1 9 111 

Transmissao Assincrona 

Tern os ai um start bit, um grupo de bits (dados) e um stop 
bit, permitindo, desta forma, que o transmissor gere informa- 
9<5es em cardter aleat6rio e que elas sejam sempre compreen- 
didas pelo receptor, tendo-se em vista que o que delineia um 
determinado dado 6 o bit de infcio (start bit) e um ou dois 
bits de t^rmino (stop bit). Uma observa 9 ao importante 6 que o 
comprimento do dado e opcional, pondendo ser de 5, 6, 7 ou 
8 bits. 

CONEXAO ENTRE EQUIPAMENTOS RS 232 

Desde que os equipamentos possuam interfaces RS 232, 6 
possfvel comunica-los entre si (o software de apoio, neste caso, 
deve coadunar os equipamentos quando estes sao de origem 
diferente). 

£ importante saber se o equipamento £ DTE (Equipamento >y 
terminal de dado 1) ou DCE (Equipamento de comunica 9 ao de m 



A interface RS 232 nada mais 6 que um padrfo de comuni- 
ca 92 o serial que atende is conformidades da EIA “Eletronics 
Industries Association”. Nao fosse isso, e se cada fabricante es- 
colhesse o seu padrao, teriamos uma verdadeira Torre de Babel 
entre os micros. 

O PADRAO 

O “C” no RS 232 refere-se a uma particular versio (-5 
volts a -15 volts nivel ”1”; e +5 volts a +15 volts nivel “0”). 
Veja a figura 1. 

Embora se usem somente algumas linhas do RS 232-C 
temos, na figura 2, o conector (do tipo DB), formado por 
25 pinos, bem como uma descri 9 ao dos sinais mais usados. 

TAX A DE TRANSMISSAO 

Um outro fator importante £ a taxa de transmissao, que 6 
o numero de ciclos de meio/ponto transmitidos em segundos 
(baud). 

Para simplificar, diremos que 1 baud 6 igual a taxa de 1 
bit, quando um bit de parada 6 usado, ou simplesmente, como 
exemplo, diremos que 300 bps significam 300 bits por segundo. 

TECNICAS DE TRANSMISSAO 

Como vimos anteriormente, o computador se comunica por 
dentro em forma de sinais paralelos. Para serializa-los, existe 
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1b mats usados cstao descritoa a cegulrt 
SINAI. 

Protegao de terra (chassis). 

O dado serial e transmitido ao disposltivo externo. 

O dado serial e recebido do dispositive externo. 

Leva ut» requlsigao ao disposltivo externo para permi- 
tir ao computador a transmissao de dados em sene. 

Entra a resposta de um disposltivo externo para o RTS, 
comunicando que esta pronta para receiver dados seriais. 
Entra no computador para dlzer que o disposltivo de re 
ccpqao esta pronto para receber* 

Serial oe terra. 

Entraoa para o computador, dlzendo que o mesmo perceoeu 
um sinal de carregamento. 

Saida pelo computador para dizer que o disposltivo ex- 
terno estrf pronto para receber ou transmitir dados Be- 
rta is. 

Entra no computador indicando que o modem recebeu um 
sinal de chamada do outro lado do telefone. 



Figura 2 
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COMPATIBILIZE SEUS ARQUIVOS VISICALC 



dados). No primeiro caso, temos as impressoras seriais, plotters 
etc., e, no segundo, o modem. 

No artigo de Roberto Quito de Sant’ Anna, em MS n? 42, as 
peculiaridades das ligates entre os diversos equipamentos sdo 
exploradas com detalhes. Aqui faremos apenas uma ilustra^ffo 
simplificada destas liga 9 des. 

Micro — Impressora - Uma forma gen^rica de liga 9 do 6 
dada baixo: 



6 DSR 20 



7 SGND 7 



1 PGND 1 



2 3 



De uma forma mais ampla, devem-se ligar tambem os pinos 
4, 5, 6, 8, 10 e 22, quando houver necessidade. 

Micro-Modem - 0 modem 6 o equipamento que permite a 
comunica 9 <fo de dois micros atrav^s de um telefone. A palavra 
modem (MODulador/DEModulador) indica as fun95es que ele 
executa. No primeiro caso, ele pega um sinal digital e o codifi- 
ca em um sinal anal6gico, modulando-o a seguir e permitindo, 
desta forma, que o sinal esteja pronto para ser transmitido por 
uma linha telefonica. 

No segundo caso, sua fun 9 ^o £ exatamente a inversa, permi- 
tindo que o modem entregue ao microcomputador um sinal di- 
gital, que £ exatamente o mesmo que foi originariamente envia- 
do pelo micro. Tambem aqui os pinos usados normalmente 
para comunica 9 do sdo os mesmos analisados anteriormente. 

Micro - Micro - Este meio de comunica 9 ao permite que se 
liguem dois computadores, diretamente entre si, atravds de um 
cabo (a distancia entre eles nao deve exceder a cinco metros). 

Em nossa experiencia (transferir arquivos do Visicalc) utili- 
zamos um micro JP-01 , compativel com o TRS80 modelo I, e 
um Dismac-8100A, compativel com o Apple II Plus. O soft- 
ware de comunica 9 ^o do TRS foi o Microterm 1.4, da Micro- 
Systems Software Inc.; e do D-8100A, o ASCII Express, da 
Southwestern Data Systems. 

Em primeiro lugar, deve-se colocar os arquivos a serem 
transferidos no mesmo disquete onde estd o software de cornu* 
nica 9 ffo que passaremos a chamar de emulador. Caso se dispo- 
nha de dois drives, melhor. Bastard que o emulador e os arqui- 
vos estejam em discos com sistemas operacionais compativeis 
entre si. No caso, usamos o Newdos 2.0, da Apparat Inc., no 
JP; sendo que o emulador do Dismac estava em DOS 3.3. 

Vamos descrever agora, com detalhes, o uso dos dois emula- 
dores, descrevendo os comandos usados para a transferencia. 

MICROTERM 

Certificar-se de que o buffer estd aberto. Caso n£o esteja, ir 
ao modo de comando, teclando o CLEAR e, em seguida, pres- 
sionar o B, observando a mudan 9 a no video da indica 9 ao 
“B: Close” para “B: Open”, quando, entao o buffer estara 
pronto para receber dados. Conv6m, ainda, esvaziar o buffer, 
o que se consegue teclando a letra C. Neste momento, obser- 
var que, do lado direito do video, aparecerd “Buf used: 0”, sig- 
nificando que o buffer estd limpo. 

Deve-se, ainda, fixar os parametros RS 232 que serdo usa- 
dos. Isso se faz acionando a tecla R. Em seguida, aparecerd na 
tela “R: Baud:”. Escreva 300 e de um ENTER. A seguir, apa- 
recerdo “R: Word:”, “R: Stop:”e “R: Parity”. Ap6scadauma 
das tr6s solicita 9 Ses, tecle, respectivamente, 8 ENTER; 1 
ENTER e N ENTER (os numeros se referem aos numerais e 



Construcao dos Cabos 

# 



s interfaces RS 232 tem 25 pinos, dos quais os mais usados 
foram analisados neste artigo . 

£ lOgico supor que ao se ligar dois micros atravds de suas 
interfaces RS 232, poderd haver uma incompatibilidade entre 
seus pinos, pois, os pinos 2 e 3, por exemplo, tem a mesma fun • 
gao. Na realidade, para que houvesse a comunicagdo entre os dois 
micros, deveria ser ligado o 2 com o 3 e vice-versa. 

No entanto, exist em no mercado interfaces RS 232 para a li- 
nha Apple que permitem que se faga a ligagdo pino a pino, sem 
qualquer alteragdo no cabo. £ o caso, por exemplo, da interface 
fabricada pela Unitron. 

Leia com atengdo o manual de sua interface RS 232 e, se ela 
fiver esta vantagem, a implementagdo se fard com a simples troca 
de um “ bloco JUMPER ” que permite que a interface seja colo- 
cada no modo DCE ou DTE, bastando inverter o jumper. 

Caso contrdrio, proceda como se segue, que foi o que tivemos 
que fazer, construindo nosso prdprio cabo. 

O cabo que ligara os dois computadores deve estar configura- 
do da seguinte forma ; ligue os fios aos pinos J t 2, 3, 4, 5, 6, 7, 8, 
20 e 22 de um dos conectores DB-25 (conector macho RS 232). 
Do outro lado, teremos outro conector macho RS 232 - 25 pi- 
nos. Os fios oriundos dos pinos 1, 7, 8 e 22 de um lado devem 
ser conectados com seus correspondentes do outro conector (1 
com 1, 7 com 7, etc.). Ligue o de numero 2 de um ao 3 do outro 
lado ; o 3 com o 2; o 4 com o 5; o 5 com o 4; o 6 com o 20; e o 
20 com o 6 do outro lado. O cabo estd pronto. 



ndo ao numero de vezes de se pressionar o ENTER). Assim es- 
taremos transmitindo ou recebendo palavras de oito bits, sem 
paridade e com 1 stop bit (veja explica9<5es anteriores sobre 
transmissao e recep 9 do de dados). 

Se a inten 9 §o for de receber um arquivo, bastard dar o co- 
mando de transmissao no outro micro e ele serd recebido na 
memoria do TRS. Ao terminar a recep 9 do, teclar a letra S, o 
que redundara em gravar o conteudo do buffer no disco. O 
programa, neste momento, dard a mensagem “S: filespec:”. 
Teclar, entdo, o nome a ser dado ao arquivo (segue-se um 
ENTER) que, uma vez gravado no disco, poderd ser usado dire- 
tamente no Visicalc. 

Observar, no entanto, que deverao ser respeitados os recur- 
sos de cada programa. Por exemplo, o Supervisicalc ou o 
Circalc permitem alterar a largura de uma s6 coluna, o que ndo 
se consegue no Visicalc. Nesse aspecto, podem ser necessdrias 
algumas adapta95es. 

O arquivo Visicalc a ser transferido n£o precisard, necessa- 
riamente, estar gravado no formato “DIF”, ao ser enviado a 
outro micro. Em se tratanto de transmissdo de arquivos Apple 
para TRS, observamos que esse procedimento, ds vezes, d mais 
adequado, embora demorado. 

Se a inten 9 ao 6 transmits um arquivo do TRS para o Apple, 
proceder da mesma forma at£ esvaziar o buffer e, entdo, acio- 
nar a tecla L, afim de colocar o arquivo a ser enviado dentro da 
memdria. Ap6s apertar L,aparecerd a mensagem “L: filespec:”; 
entdo, deve-se escrever o nome do arquivo a ser colocado na 
memoria do micro, seguido de dois pontos e o numero do 
drive onde ele se encontra (ex.: “1 : filespec: MATRIZ/S85:2) e 
teclar ENTER. Assim, o arquivo ira para a memdria do compu- 
tador. Em seguida, pressionar o T, que € a chave de transmis- 
sdo do conteudo do buffer, e apertar o ENTER tres vezes. 
Nesse momento, certifique-se de que o computador estd pron- 
to a receber os dados. Se estiver tudo certo, tecle CLEAR e a 
transmissao tera infcio. Nao se esque 9 a de colocar os dois com- 
putadores em half duplex, para poder acompanhar, nas duas 
telas, a transferencia de dados. 



ASCII EXPRESS 

Para receber um arquivo no Apple, carregar o ASCII EX- 
PRESS, dar o comando CONTROL Q (daqui por diante usare- 



RECEPT0R 



TRAMSMISS0R 
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mos o simbolo “A” para representar o CONTROL). Em segui- 
da, teclar U e aparecera um menu, dentro do qual se deve ob- 
servar, principalmente, as op9<5es E e F. Teclado E, sucessiva- 
mente, havera uma altemancia entre half e full duplex. Colocar 
em half duplex. Acionando o F, alteraremos o data word 
format , isto e, a forma de envio/recep^o dos dados, e aparecc- 
r2o vdrias opsOes. A escolhida deverd ser a de numero 5, isto 
“8 N 1” (8 bits, no parity, 1 stop bit). Ap6s a escolha, pressio- 
nar a letra X para voltar ao modo terminal. 

Como passo seguinte, teclar A R, uma ou duas vezes, atg 
obter a mensagem “copy on”, significando que o buffer estard 
pronto a receber dados. Acionar, ainda, A C (para limpar a me- 
m6ria). Ao terminar, o Apple estara apto a receber dados do 
outro micro. Ao acabar a recep^ao, retirar o disco do ASCII 
EXPRESS e colocar aquele no qual se deseja gravar o arquivo 
recebido. Teclar, ent£o, AW e responder a pergunta 
“Filename?” com o nome do arquivo a ser gravado seguido de 
RETURN. Pronto! O arquivo. entao, 6 gravado no disco. 

Para transmitir um arquivo do Apple para outro compu- 
tador, proceder at£ onde indica o paragrafo anterior, acio- 
nar o AQ e, a seguir, o S. O ASCII EXPRESS perguntara 
“Filename?”. Nesse momento, retirar o disco com ASCII 
EXPRESS e colocar o que cont6m o arquivo a ser transmitido. 
Escrever o nome do arquivo a ser enviado e pressionar o 
RETURN quatro vezes. Logo ap6s, aparecerffo as perguntas 
“S)standard or Protocol?”, “L)ine or Character?” e 
“Prompt”. Pressionando o RETURN quatro vezes, conforme 
indicado anteriormente, assumiremos os defauts para as per- 
guntas acima, optando por transmitir em standard, linha por 
linha e sem aguardar um possivel prompt ap6s cada linha. 



CONCLUDES 

At6 onde e xpe rim en tamos, os arquivos Visicalc do JP-01 
foram aceitose funcionaram perfeitamente no Visicalc e Super- 
visicalc carregados no Dismac D-8100 e vice-versa. 

A16m dos softwares de comunica^o citados, acreditamos 
nao haver dificuldades em se usar outros, com recursos seme- 
lhantes.. 

No momento estamos testando a transference de arquivos 
de processadores de texto, sendo que obtivemos bons re- 
sultados na transference de arquivos do Scripsit para o Magic 
Window II. 

Tencionamos realizar testes semelhantes entre computado- 
res compativeis com o TRS-80, Apple e IBM-PC. Alids, a i estd 
uma boa sugestao de trabalho para os leitores. 

Finalizando, gostariamos de deixar claro que a interface 
RS 232, embora ofere^a um grande potencial para comunica- 
$ao entre equipamentos, d por si propria um sistema sofistica- 
do e, de certa forma, um pouco complexo para utiliza^o, tor- 
nando-se necessaria uma familiariza^ao do usuario com o siste- 
ma, para que se possa obter o mdximo de potencialidade de 
sua RS 232. 



JosA Carlos Niza A e n gen heir o eletrdnico e tr aba I ha com microprocessa- 
dores nas Areas de manutenqSo, projetos e anAlises de sistemas na Com- 
puter Service, RJ. 

Ronaldo Curi Gismondi A mAdico, Professor da Terceira Discip/ina de 
Clfnica MAdica da Universidade do Estado do Rio de Janeiro e Coorde- 
nador de Saude Publica do Municfpio de Niterdi, RJ. 
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□ Alexander, D. C. Programap3o em Assembler e Linguagem de 

Mdquina, 2? ed Cr$ 35.000 

□ Barden, Jr., W. Manual do Microcomputador Z-80 Cr$ 56.500 

□ Botelho, A. J. L. Desafio. Os Mais Excitantes Jogos em BASIC Cr$ 45.000 

□ Chance. D. 30 Programas em Basic para Computadores Pessoais . Cr$ 48.000 

□ Chantler, A. Tdcnicas e Prdtica de Programapflo Cr$ 26.500 

□ Chmura, L. J. e Ledgard, H. COBOL com Estilo Cr$ 29.500 

□ Christian, K. Sistema Operacional Unix Cr$ 65.000 

□ Christmann, R. U. Basic Sinclair Cr$ 24.500 

□ Cook, R. e Hartnell, T. Como Programar o seu Apple Cr$ 21 .000 

□ Date, C. J. Introdupao a Sistemas de Bancos de Dados, 2® ed. . . Cr$ 82.000 

□ Date, C. J. Bancos de Dados, Um Texto Introdutdrio Cr$ 49.000 

□ Furtado, A. L. e Santos, C. S. OrganizapSo de Bancos de Dados Cr$ 58.500 

□ Furtado, A. B. ProgramapSo Estruturada em COBOL Cr$ 31.000 

□ Gratzer, E. A. e Gratzer, T. G. Basic R4pido: Aldm do Basic TRS-80 Cr$ 43.000 

□ Hancock, L. e Krieger, M. Manual de Linguagem C Cr$ 39.500 

□ Hughes, C. Primeiros Passos com o seu SINCLAIR (TKs) Cr$ 24.500 

□ Ledin, Jr., G. et al. COBOL, Regra para Programadores Cr$ 39.000 

□ Marshall, G. FORTRAN para Micros Cr$ 19.000 

□ McCracken, D. D. Manual de Cobol Estruturado Cr$ 67.500 

□ Meili, E. APLICALC, um Software Educacional, Pessoal e 

Profissional em Basic Cr$ 27.500 

□ Nagin, P. e Ledgard, H. F. BASIC com Estilo Cr$ 24.900 

□ Pereira F9, J. C. Basic para Micros Pessoais, 2? ed Cr$ 29.500 

□ Santos, N. AI6m do BASIC, Linguagem Assembler para a linha 

SINCLAIR Cr$ 28.000 

□ Warmer, J. D. LCS — Ldgica de ConstrupSo de Sistemas, 2? ed. . . . Cr$ 37.500 
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Utilitarios 

Apple 

Toda a colegao de pro- 
gramas utilitarios para 
Apple da Beagle Bros, soft- 
wan -house americana, se 
encontra a disposigao dos 
consumidores brasileiros, 
numa versao especial, tra- 
duzida e melhorada pela 
Potencial Software de Cam- 
pinas (SP>. 

Os programas incluem 
editores de graficos; utili- 
tarios; melhoramentos no 
sistema operacional (Super 
DOS); editores de textos, 
DOS BOSS (altera os co- 
mandos do DOS); progra- 
mas de alta resolugSo grdfi- 
ca e inovagdes no Apple- 
soft BASIC (BASIC PRO) 

O prego m&Jio unit4- 
rio 6 de Cr$ 90 mil, o que 
inclui disquete e manual 
de operagao. Os programas, 
inicialmente, serSo comer- 
cializados atravds de MI- 
CRO SISTEMAS. 

O enderego da Poten- 
cial Software 6 Rua Jos6 
Vilagelin Junior, 52 — Cam- 
bur, tel.: (0192) 53-6992 - 
Campinas, SP. 



A Lotus 

O Sr. Stephen Khan, Interna- 
tional Manager da Lotus, famosa 
software-house norte-americana, 
veio ao Brasil e realizou palestras 
no Rio e em Sao Paulo. A 16m de 
descrever os principals produtos 
da empresa — os softwares 1-2-3 
e Symphony — apontando suas 
principals caracteri'sticas tunicas, 
o Sr. Khan salientou que existe, 
por parte da Lotus, um enorme 
interesse no mercado latino-ameri- 
cano. 

A Lotus Development, funda- 
da em 1982, atingiu sucesso e nf- 
veis de receita surpreendentes ao 
langar nos Estados Unidos, em 83, 
o software 1-2-3, o primeiro a 
utilizer concretamente a nogSo de 
software integrado.O "best -seller" 
1-2-3 possui fungoes de spread- 
sheet planilha eletrdnica de c£l- 
culo); banco de dados e grdficos 
integradas. 

O 1-2-3 jd d bastante difun- 
dido no Brasil, sendo usado por 
praticamente todos os possuido- 
res de micros de 16 bits. Outros 
produtos da empresa — mais re- 
centes — ainda n§o s3o muito co- 
nhecidos entre n6s. O Symphony 
jd e comercializado aqui, e adicio- 
na ds fungOes do 1-2-3, capacida- 
de para processamento de texto 
e transmissao de dados. O Jazz, 
ultimo langamento da empresa, 
foi desenvolvido para rodar no mi- 
cro de 32 bits Macintosh, da Apple 



Digiponto 

visa 

exportagao 

A Digiponto, primeira fabri- 
cate nacional de teclados para 
computadores, estd comemorando 
sete anos de criagao. A empresa 
comegou com 30 funciondrios no 
bairro da Saude, no Rio de Ja- 
neiro, e hoje conta com mais de 
600, instalados em Vicente de 
Carvalho, numa drea de 35 mil 
metros quadrados. 

A Digiponto atende a grande 
parte da industria nacional de 
computadores e agora volta-se pa- 
ra a exportagao. Contatos jd fo- 
ram mantidos com a Franga, Ar- 
gentina, China, Mexico e Vene- 
zuela com o apoio da ABICOMP. 

Durante este ano serao langa- 
dos dois novos tipos de teclados 
utilizando tecnologia capacitiva. 
Esta tecnologia permite atender 
melhor aos requisitos de ergo- 
nomia e manter a alta durabilida- 
de e confiabilidade dos teclados. 

no Brasil 

Computer, que ainda nao possui 
um compatfvel nacional. 

Todos sao softwares destina- 
dos aos negbcios de forma geral 
e a Lotus vende, ainda, os assim 
chamados "add-ins". Para o Sym- 
phony, por exemplo, temos a 
possibilidade de acrescentar um 
Spelling Checker que cria um di- 
ciondrio e corrige erros e o Sym- 
phony Link que liga o PC a um 
mainframe. 

A razSo principal da vinda do 
Gerente da Lotus ao Brasil, con- 
tudo, parece ter sido reiterar pe- 
rante d imprensa que a empresa 
brasileira Intercorp do Brasil d 
a sua unica representante no mer- 
cado nacional. Tal preocupagao 
d compreensfvel se considerar- 
mos que a empresa americana 
esta procurando se salvaguardar 
da pirataria. 

Nos Estados Unidos estima- 
se que, de 1981 a 1984, as pro- 
dutoras de software deixaram de 
ganhar US$ 1.3 bilhdes devido 
ao mercado pirata. 

No sentido de impedir que 
seus programas sejam indevida- 
mente comercializados aqui, mui- 
tas software-houses norte-ameri- 
canas optaram pela representagdo 
exclusiva, atraves da qual somen- 
te uma empresa fica autorizada a 
comercializar e prover treinamen- 
to em seus sistemas; ao menos 
teoricamente. 




Lan^amentos Digitus 



A Digitus, de Belo Horizonte, 
langa dois novos produtos no mer- 
cado. O primeiro deles, o Multi - 
Modem, opera em 300 bps, 1200 
half e 1200/75 full duplex 

O segundo produto d o micro 
DGT -PR que permite ligagao em 
redes, e emulagao de terminal 
IBM inteligente. O micro vem 
com memdria RAM de 128 Kb 
(expansive! a 512 Kb); duas por- 
tas seriais RS-232 sendo uma si'n- 
crona e outra assmcrona; interfa- 
ce para drives de 5 e 8" simulta- 
neos; controlador de video para 
terminal grdfico colorido com alta 



resolugao: 128.000 pontos (640 x 
240). 

Aldm dessas caracterfsticas, o 
DGT-PR possui teclado numdrico 
separado, possibilidade de cone- 
xao de discos Winchester, sistema 
operacional CP/M 3.0, compati'- 
vel com o CP/M 2.2, e software 
de conexao a rede CETUS. 

A DIGITUS fica na Rua G£- 
vea, 150 • Jardim America - Tel.: 
(031) 332-8300. A filial do Rio 
de Janeiro fica na Rua Barata Ri- 
beiro, 391 - Copacabana - Tel.: 
(021) 257-2960. 



Unitron langa drive 

A Unitron, fabricante dos microcomputadores API I e API I Tl, 
est3 colocando no mercado seu mais novo produto. Trata-se do 
UD 5, um drive do tipo slim, para disquetes de 5 1 /4" (FS/DD). 
Essa 6 a primeira incursao da Unitron no setor de perifdricos. 
Segundo o diretor da empresa, Geraldo Azevedo, nos drives 
tradicionais h3 um aproveitamento de 35 trilhas, enquanto que 
na unidade UD 5 o usudrio podera utilizar 40 trilhas, 20 Kbytes 
a mais do que nos outros drives. O prego de langamento 6 de 63 
ORTN, e estS prevista uma redugao de 15% sobre este valor 
com o aumento da produgao e do Tndice de nacional izagao dos 
componentes. O UD 5 j£ pode ser encontrado nas lojas especiali- 
zadas, e sera comercializado tamb6m em OEM. 



Microtec vende PC’s para USP 

A Microtec saiu 
vencedota da con- 
correncia publica e- 
fetuada pela USP, 
Universidade de Sao 
Paulo, para o forne- 
cimento de 50 equi- 
pamentos compat I'- 
ve is com o IBM/PC. 

A Micro tec con- 
correu com mais 
quatro empresas e se 
comprometeu a en- 
tregar o lote de 
maquinas PC-2001, 
que a universidade 
ira distribuir entre 
as faculdades e se- 
tores administrati- 
vos, por Cr$ 1 ,5 bi- 
IhiTo. 
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E|||^ Sempre o melhor 
IzZstZZZ programa para voce 





... 



HARDWARE 

• CPU's das linhas: 

Apple, TRS-80 e Sinclair 

• Interfaces para: 

Disco, Impressoras, CP/M, 
80 colunas e Expansao de 
mem6ria 

• Drives para v£rios modelos 

• Monitores e impressoras 



SUPRIMENTOS 
) Formuldrios contlnuos 



• Diskettes 



> Etiquetas 



• Fitas para impressoras 



LIVROS 

• Microproces. Z80 e 6502 

• Cursos de Basic 

• Programa^ao estruturada 

• Linguagens Basic, Cobol, 
Pascal 

• Circuitos Eletronicos 

• Jogos Inteligentes 

• Revistas 











Av. Brigadeiro Faria Lima, 1390 

8° And. Cj. 82 Tels.: (011) 813 6407 - 210 1251 

01452 • J. Paulistano - S3o Paulo - SP 








Telsist expande sua 
produgao de micros 



Modem Para Renpac 

A ELEBRA TELECON est3 lanpando o EM-1275, um modem pro- 
fissional que tamWm atende 3s ligapoes entre micros. 

Este equipamento pode trabalhar em tr3s diferentes velocidades: 
1200 bps com canal secund3rio de 75 bps; 1200 bps semi-duplex e 300 
bps semi-duplex e 300 bps duplex a 2 fios. Desta forma, o usu3rio que 
quiser interliqar-se 3 "tela-servipos" (RENPAC, CirandSo, CBBSs, etc.) 
que operam a velocidades diferentes, poder3 faz3-lo com o mesmo mo- 
dem. 

O EM- 1275, tamtam pode ser configurado com resposta autom3- 
tica, em suas diferentes versdes. O modem opera tamWm em I inha pri- 
vativa. O enderepo da ELEBRA TELECON 6 Avenida Faria Lima, 1383 
— 6? andar/Jardim Paulista. Telefone (011) 813-9065 Sao Paulo (SP). 
No Rio, Avenida Rio Branco, 50/SL. Tel: (021) 253-5596. 



Prevenindo acidentes 



O Computer Shopping Moore apresenta duas novidades: o 
alarme t3rmico program 3vel e o detector eletrdnico de fumapa, 
am bos da marca Sicurplex. O alarme t3rmico 3 um termdmetro 
digital no qua I pode-se programar duas temperaturas, uma mi'ni- 
ma e outra maxima. Ul trapassados os pardmetros, o alarme 3 dis- 
parado. J3 o detector de fumapa 3 composto por uma c3mara 
idnica, um sistema eletrdnico de controle e um sistema de aviso 
com sirene. Ambos os aparelhos funcionam com pilhas alcalinas 
comuns e possuem ainda um sistema que avisa quando a pilha co- 
mepa a ficar fraca. 



Otimismo na Clappy 



Desde que se desligou da Raci- 
mec, em fins de 1984, a empresa 
carioca Telsist vem cumprindo um 
piano estrat3gico bem definido 
para ganhar espapo, aos poucos, 
no mercado de equipamentos pro- 
fissionais. Em primeiro lugar, na 
luta por uma maior penetrapao 
nacional, foram abertas instala- 
p6es em SSo Paulo. O prdximo 
passo foi investir alto na propa- 
ganda de seus produtos. Os resul- 
tados j3 comepam a surgir: a pro- 
dup3o mensal, hoje em tomo de 
130 m3quinas, est3 prevista para 
atingir 500 m3quinas dentro de 
cinco meses. Para isto, a direto- 
ria estuda a construpSo de uma 
nova f3brica (a produpSo ainda 3 
feita nas instalapdes da Racimec). 
Segundo Antonio Augusto Gomes 
de Mattos, Gerente de Negdcios, 
em, no m3ximo, um ano a f3bri- 
ca estar3 funcionando. 

As duas linhas de equipamen- 
tos da empresa sao denominadas 
1000 e 2000. A linha 1000 con- 
siste numa rede multiusu3ria mo- 
dular, baseada em UCP de 8 bits 
Z 80 A, com 64 Kb RAM, um dri- 
ve de 5” e disco Winchester de 
20 Mega. A UCP, denominada Tel 
1806, possui safda paralela (centro- 
nics) e oito portas seriais, sendo 
duas RS 232*C e seis RS -422, para 
ligar-se 3s estapdes de trabalho. 
No extremo oposto da rede po- 
dem situar-se tanto os terminais 
inteligentes TEL 1800A, com 64 
Kb RAM, quanto o TEL 1802, 



que j3 vem equipado com dois dri- 
ves de 5". O sistema operacional 
utilizado 3 o DOS-MB, compatfvel 
com o CP/M 2.2. 

A mesma conceppao modular 
foi utilizada na arquitetura da li- 
nha 2000, que permite a ligapao 
de equipamentos de 16 bits (8 ou 
16 workstations), monitorados 
pelo TEL 2608, que vem equipa- 
do com dois processadores, Intel 
80186 e Z 80 A. As estapdes de 
trabalho 2605 podem vir em trSs 
versdes: 2605-ET; PC ou XT. A 
vers So ET, standard, possui 256 
Kb de RAM, expansfvel a 512 
Kb na prdpria placa ou 640 Kb 
mediante cartSo de expansSo. 
Atrav3s de seus 5 slots, podem ser 
a ele conectadas as expansdes de- 
senvol vidas para os compati'veis 
com a linha IBM-PC. A versSo 
2605-PC mant3m as caracteri'sti- 
cas do ET, por3m j3 vem com dois 
drives de 5", enquanto que o XT 
possui uma unidade de disco de 
5" e uma para disco ri'gido, com 
capacidade de 1 2.75 Mega. A ques- 
tSo da compatibilidade fez com 
que a linha 2000 fosse concebida 
de forma a oferecer total comuni- 
capSo com o padrSo IBM-PC, e 
ainda compatibilidade com a linha 
1000, de 8 bits. Mesmo os que j3 
sSo usuSrios de micros de 16 bits 
de outros fabricantes podem se li- 
gar S rede Telsist pois, segundo a 
diretoria, a prdpria empresa se en- 
carrega da tarefa de compatibilizS- 
los. 



Ap6s o pedido de concordata 
feito pela loja carioca Clappy Mi- 
crocomputadores Ltda., o clima 
na empresa 3 de otimismo, pelo 
menos por parte de seu presiden- 
te Alberto Mattos. Segundo ele, 
a recuperap3o da empresa 3 alta- 
mente vi3vel e cita como moti- 
vos o fato de ter recebido um gran- 
de apoio dos fornecedores e clien- 
tes e de ter alcanpado o fatura- 
mento de Cr$ 2 bilhdes, um mSs 
ap6s o pedido de concordata. Al- 
berto Mattos informou ainda aue 
a empresa est3 com mais de Cr$... 



200 milhdes de pedidos em cartei- 
ra. 

Para superar a crise, a Clappy 
procedeu a uma contenpao de 
despesas de cerca de 30%, inclu in- 
do a i* a diminuipSo do seu quadro 
de funcionSrios. AI3m disto, a em- 
presa vai reformular a filial de Co- 
pacabana, tornando-a um pdlo ge- 
rador de cursos e treinamento 
ra empresSrios e profissionais li- 
rais, direcionando seu com3rcio 
para a venda de solupdes, isto 3, 
pacotes prontos para determ in a- 
dos segmentos do mercado. 



/ STRINGS 




* A SERVIMEC organizou dois semin3rios de InformStica para este 
mes. Sao eles: MUMPS, de 3 a 5 das 9:00 as 17:30 h e "Programapao 
Estruturada" de 29 a 31, no mesmo horSrio do primeiro. Maiores infor- 
mapdes: (011) 222-1511 (SP). * O Grupo Advancing de Porto Alegre 
programou para este mSs os cursos de AutomapSo Banc3ria; Redes Lo- 
cais; Acesso, Pesquisa e RecuperapSo de Informapdes em Bancos de 
Dados; e ComunicapSo na Inform^tica. Mais informapdes pelos tels.: 
(0512) 26-8246 ou 26-1988. * O Banco do Estado de Goids (BEG) ins- 
talou o Banktec, sistema de automapSo bancaria da Itautec, nas suas 
agendas de Goidnia. At£ o final do ano o sistema ser£ implantado em 
mais 17 agendas. O BEG possui 66 agendas em cinco estados (GO, RJ, 
SP, MG e DF). * A DISMAC lanpou sua calculadora financeira: a HF- 
100 que faz c£lculos de juros compostos, cdculos matem3ticos, margem 
de lucro, porcentagem e vem com bateria de ITtio, energia garantida por 
longo peri'odo. * O CDT — Centro de Desenvolvimento de Tecnologia e 
Recursos Humanos — oferece, este mes, cursos de confecpSo de circui- 
tos impressos e sistemas digitais. O CDT ficaem S. J. dos Campos. Maio- 
res informapdes, atraves do tel.: (0123) 21-9144 (ramal 236). * A Real 
Soft — Sistemas e Consul toria, informa que todos os aplicativos de seu 
cateiogo estao disponiveis na versao 16 bits, para compati'veis com o 
IBM/PC. Entre os aplicativos encontram-se: Contas a Pagar e Receber; 
Controle de Loteamentos e Controle de Processo de Cobranpa Mercan- 
til. Informapdes: (011) 241-1976 (SP). * Depois de 36 mil horas de 
testes em 50 clientes, a Itautec iniciou a produpSo em serie do 1-7000 
PC xt, o seu micro de 16 bits. A produpao inicial 6 de 200 unidades por 



m6s devendo chegar a 300 ainda este ano. O micro, al6m de compatf- 
vel com o IBM/PCxt, roda todos os programas do 1-7000, o 8 bits da 
Itautec. * A Microdigital, atrav6s da sua software -house Microsoft, estd 
colocando no mercado o programa "Passo a Passo", um curso de pro- 
gramapao em linguagem BASIC, composto por dez aulas, com testes de 
avaliapSo ao final de cada uma delas. Para os micros TK 2000 e TK 
2000 II. * A IBM — International Business Machines — entrou com ap5o 
na Justipa de S3o Paulo contra Microcraft e Sacco Computer Store. A 
primeira foi acusada de ter copiado o sistema operacional BIOS, de pro- 
priedade da empresa norte-americana, em seu equipamento Craft XT, e 
a segunda por comercializar o micro em quest3o. A Microcraft argumen- 
ta que o equipamento havia sido enviado 3 Sacco para testes e a loja 
afirma que desconhecia o fato de o micro estar equipado com o BIOS. * 
A Proldgica conta agora com um departamento especial para atendi- 
mento aos usuArios dos sistemas. Trata-se do DSAT -- Departamento 
de Software Aplicativo/Treinamento de Sistemas, onde 32 tdcnicos de 
m'vel superior est3o 3 disposipao do cliente. O telefone do DSAT 3 
(01 1) 531-8822. Se a duvida for relacionada a suporte, os ramais 234 
e 236 est3o 3 disposipSo. Se forem questdes sobre treinamento, os ra- 
mais s3o 269 e 295. * A LIVROTEC — Livraria Especial izada em Li- 
vros T6cnicos — acaba de ser inaugurada em Macap3, capital do estado 
de Amap3. A livraria pretende suprir as crescentes necessidades da rede 
de ensino e profissionais liberais e fica na Avenida Ana Nery, 192 — 
Macap3/Amap3. 
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PEQAS ORKSINAIS 

NUNCA 

PREGAM PECAS 

No momento em que for necessaria a expansao de seu AP II ou T.l. Unitron ou ainda a 
reposigao de algum dos componentes, verifique cuidadosamente se as pegas sao originals. 

Fazendo isso voce ou sua empresa estarao lucrando mais, com uma serie de vantagens. 

A primeira delas esta na garantia que a fdbrica oferece para con juntos formados com 
acessorios originais Unitron. Outra vantagem esta na alta qualidade de uma pega ou acessdrio 
original; voce ou sua empresa contam com a assistencia tecnica sempre presente nos 
momentos necessarios, alem disso a expansao do seu Unitron serd sempre assistida 

por tecnicos especializados. 

Cuide do seu patrimonio. Afina! pegas originais nunca pregam pegas. 




Dll: 

Interface controladora para 
atd duas unidades de disco 
ftexivel de 5 1/4”. 




Graph +: 



Interface paralela para im- 
pressora com fungoes gr Mi- 
cas e comandos prdprios pa- 
ra as impressoras nacionais. 




+ 16K, + 32K, Z80: 



+ 64K e + 128K: Mddulo com microprocessa - 

Expansdes de Memdria RAM dorZ-80 adicional, permitindo 
com a possibilidade de simu- utilizagao de Sistema Opera- 
lagao de ' ‘disk-drive 1 ’ de alta cional CP/M. 
velocidade (pseud&disco). 




Mddulo para mudanga do pa- 
drio de video para 80 colu - 
nas x 24 linhas. 



Outras expansdes Unitron: Interface para comunicagdes, RS-232C - Memdria Buffer adicional 
para impressora - unidades de disco “SUM" de 5-1/4 ou 8, impressoras de80a 125 CPS, 
mddulo de cores PAL-M ou modulador de RF para conexao a TV, - interface GP-IB para controle 
de instrumentagao, - cartao com memdrias EPROM para insergao de “programas residentes". 




CAIXA POSTAL 14127 - SAO PAULO - SP 
TELEX (Oil) 32003 UEIC BR 




0 Elppa II Plus 6 um micro computador. 

r ) que tem macro vantagens. 

feito quase artezanalmente, portanto testado 
um a um. 

E isso b uma macro qualidade. 

Como £ feito com componentes de alta qualidade, 
dentro dos melhores padrdes de Engenharia, a 
confiabilidade do Elppa II Plus 6 macro. 

O custo de manutengao 6 micro- o unico com um ano 
de garantia - macro qualidade com macro garantia. 

J£ com o prego acontece uma coisa interessante, 
deveria ser macro, mas quando voce verifica o custo 
de uma configuragSo ve que 6 micro. 

A assistencia tbcnica 6 macro - direta do fabricante 
ou atravbs de seus credenciados. 

Ele 6 um Apple® compatlvel e dispde de vasta gama 
de expansdes e perifbricos a sua disposigao - 
CONTROLADOR DE DRIVE, CP/M, PAL-M, 80 
COLUNAS, SOFTSWITCH, 16K, 64K, 128K, GRAPH + , 
SUPER SERIAL CARD, SINTETIZADOR DE VOZ, 
MONITOR III, etc... - macro vantagem. 




Tem hora que precisa ser macro. 




Conclusdo: Seja para voce ou para sua empresa, 
micro ou macro, faga como a Rede Globo, a Rede 
Bandeirantes ou a Control que tem se utilizado do 
Elppa II Plus em suas necessidades empresariais ou 
como os funcionbrios do Bamerindus para suas 
atividades profissionais e de lazer. 
Faga como tantos outros, que estdo aproveitando as 
vantagens de um micro 
que sabe ser macro na 



hora certa. i Macro 

Escolha o Elppa II Plus M aOO 
a macro escolha. 



, garant* 3 

inteirinno 



micro macro. 



Fabrica: Rua Aimbere n° 931 - S.P. Tel. 864.0979 • 872.21 34 
Show Room: Av. Sumarb n? 1 .744 - S.P. Tel. 872.4788 



• SSo Paulo - Audio 282-3377 - ADP System 227-4433 - Bruno Blois 223-701 1 - BMK 62-9120 - Europlan 256-9188 - Victor Show Room 872-4788 • Rio de Janeiro 

- CM L 285-6397 - Eleceeme 201 -3792 - Formed 266-4722 - Sistema 253-0645 - SC Sistemas 232-8304 • Belo Horizonte - Spress 225-8988 • Porto Alegre - Aplitec 
24-0465- DB Computadores 22-5136 - Embramic 41-9760 • Vitbria - Metaldata 225-4700- Soft Center 223-5147 • Brasflia - Compushow 273-21 28 • Curitiba 

- Video e Audio 234-0888 • Londrina - Set In 23-6183 • Recife - NC Sistemas 228-0160 — Tecromic 325-3363 • Florianbpolis - Micro Home 23-2283 • Sfio Josb 

do Rio Preto - Teledata 33-2714 • Fortaleza - Systematic 244-4746 





Cobra apresentara supermini 



Procurar util izar terceiros, prin- 
cipalmente as Universidades, em 
seiis projetos, para manter sua 
vantagem tecnolbgica em relapao 
ds outras empresas. Esta 6 uma 
das estratggias da Cobra, que com- 
pleta 11 anos e, segundo seu Pre- 
sidente Fernando da Costa Aze- 
vedo, ainda tem muito a real izar 
enquanto empresa estatal. Desbra- 
var novos campos, por exemplo. E 
justamente um ano ap6s seu ulti- 
mo lanpamento, o Cobra-540, a 
empresa prepara-se para apresen- 
tar ao publico na V Feira de In- 
formStica, em setembro, o seu su- 
permini, com tecnologia da norte- 
americana Data General. 

"Pesquisamos o mercado", diz 
Jorge Ferreira da Silva, Diretor de 
Marketing, "e a tecnologia da Da- 
ta General nos pareceu mais ade- 
quada por ser a mais recente (os 
modelos Eclipse MV/4000 e MV/ 
8000 II, de 32 bits, nos quais ir4 
se basear a linha 1000 da Cobra. 



foram lancados em 82 e 83 res- 
pectivamente). Isto nos garante 
produtos com maior horizonte de 
tempo. Por outro lado, esta 6 a 
tecnologia mais avanpada para 
aplicapoes comerciais, cerca de 
95% do mercado brasileiro em ter- 
mos de volume de dinheiro". 

Sobre um possi'vel atraso da 
Cobra em relapSo d sua concorren- 
te Elebra Computadores, bem 
mais adiantada em seu projeto de 
supermini baseado no Vax750, de 
tecnologia da Digital Equipament 
Corporation, Ferreira coloca que 
a Cobra possui toda uma infra- 
estrutura, "e n5o est3 montando 
uma industria para esta produ- 
pao". Segundo ele, estao sende 
concentrados esforpos para iniciar 
as entregas em outubro. 

Os superminis da Cobra nao 
estbo vinculados, por contrato, a 
peritericos da Data General. Os 
sistemas, com prepo unitirio mg- 
dio de 60 mil ORTN, poderSo 



usar os monitores, drives e unida- 
des Winchester da Cobra; fitas 
magn6ticas da Conpart e impres- 
soras Digilab. O software da Data 
General, este sim, estara disponf- 
vel: SO, linguagens, software de 
cornu nicapbo e banco de dados. 

Nesses superminis residem as 
maiores expect ativas da diretoria, 
no que tange ao crescimento real 
de vendas da empresa, que em 84 
foi de 16%. Ap6s anunciar lucro 
no exerci'cio passado, Ferreira 
prev6 para 85 um crescimento de 
vendas da ordem de 46%, meta 
somente possi'vel com a nova li- 
nha ("sem o supermini, o cresci- 
mento seria de 10%"). 

Em funpdo do alto custo dos 
equipamentos, para viabilizar eco- 
nomicamente o projeto da linha 
1000, o esquema de comerciali- 
zac§o da Cobra precisar4 de uma 
maior flexibilidade. Por isto, have- 
rs um deslanche agressivo nas ope- 
rapoes de aluguel. 



Apoio diversified suas atividades 



A Apoio — Servipos e Sistemas de Inform^tica 
esta completando quinze anos. O grupo, cujo ge- 
rente geral b Benito Dias Paret, foi fundado em 
1970 como bureau de servipos, mas ao longo destes 
anos de atuapbo no Rio de Janeiro, partiu para a di- 
versificapao de suas atividades. Criou, entio, a 
Apoio Microinformatica, uma system house que 
oferece sol up be s completes para os seus clientes 
como sistemas aplicativos; fornecimento de hard- 
ware/software; consultoria e criapao de sistemas de 
automapao industrial ou de escritbrios, albm de 
montagens de interfaces e processadores para fins 



especiais. 

No momento, a Apoio Microinformatica a res- 
ponsavel pela implantapSo de um projeto de infor- 
matizapao de diversas usinas de cana-de-apucar do 
norte fluminense. 

Paralelo as atividades da Apoio, o grupo desen- 
volve, com a empresa Teledata, o projeto Teleche- 
que, sistema de protepao aos cheques com uma 
madia de duas mil consultas diarias. A Teledata 
detem a tecnologia de consultas de cheques por 
computador e implantou no Rio, a exemplo de 
SSo Paulo, este sistema pioneiro. 




O novo S-700 

A P'olbgica esta lanpando a 
terceira gerapao do seu sistema 
700. O novo equipamento a com- 
posto de 3 mbdulos; teclado, 
monitor de vfdeo e UCP, e seu 
prepo a 10% menor que a versaTo 
anterior. A UCP possui tres mi- 
croprocessadores, dois Z80A, sen- 
do um para controle de E/S, e 
um Intel 8035, para controle do 
teclado. O novo 700 trabalha com 
discos Winchester de 5,10 ou 15 
Mbytes. O sistema operacional a 
o SO 8, compatfvel com CP/M 
versao 2.2. 



Prepos da Computique 



A Computique SSo Paulo, que fica na Av. Angaiica, 2578, 
anuncia os prepos de alguns dos produtos que comercializa: 



UCP Exato Pro (48Kb) 83 ORTN 

UCP AP II Unitron (48Kb) 88 ORTN 

UCP Craft II Plus (48Kb) 65 ORTN 

UCP PC 2001 (16 bits) 850 ORTN 

UCP Craft XT (16 bits) 875 ORTN 

Placas 

Interface controladora de disquete 12 ORTN 

Interface paralela para impressora 13 ORTN 

PlacaCP/M 14,5 ORTN 

ExpansSo de 16Kb 14 ORTN 

Perifaricos 

Impressora Mbnica 140 ORTN 

Monitor CCE 12" fbsforo verde 24 ORTN 

Monitor Compo 12" fbsforo verde 45 ORTN 

Suprimentos 

Disquete 5 1/4" (FS/DD) -Verbatim 0,49 ORTN 

Software 

Super-Visicalc 10 ORTN 

Janela Mdgica II 10 ORTN 

Passo a Passo 2,9 ORTN 



Sinclair 
perde na 
Justiga 

Teve fim o primeiro litfgio na 
area de informdtica no Brasil, que 
envolveu as empresas Sinclair e 
Microdigital. A Sinclair (inglesa) 
moveu uma apao contra a fabri- 
cante nacional dos micros TKs, 
alegando que esta ultima havia co- 
piado o circuito el4trico, teclado 
e o software bisico do micro ZX- 

81, que teria dado origem aoTK- 

82, hoje fora de linha, mas que na 
£poca era o unico micro fabricado 
pela Microdigital. O processo co* 
mepou em abril de 1982, com 
uma busca e apreensao cujo laudo 
determinou ter realmente havido 
cbpia. Na contestapio da Micro- 
digital, foi pedida nova perfeia 
sob alegapfto de que o laudo era 
falso e as concludes estavam er- 
radas. 

A nova perfcia concluiu que o 
software b£sico 6 parte integrante 
da m£quina, ou seja, compbe o 
hardware do equipamento. Quan- 
to aos teclados, o perito afirmou 
que teclados semelhantes ao da 
autora ja existiam na ^poca, em 
grande numero. Com relapao d 
membria ROM a conclusSo do pe- 
rito dizia que as combinapbes na 
membria ROM sSo finitas e que o 
conteudo da ROM do aparelho 
da rg nffo 4 id4ntico ao da autora. 

Segundo o advogado da Micro- 
digital, Georges Fischer, a Sinclair 
na 6poca tinha interesse em entrar 
no mercado brasileiro, o que fez 
com que a empresa ingressasse 
numa aventura judicial "baseada 
inclusive em falsos documentos". 
O juiz Francisco Gambardelle aca- 
tou o laudo da segunda perfcia e 
determinou que a Sinclair pague 
os custos processuais, albm de ho- 
nor^rios dos advogados e dos pe- 
ri tos. 



CONIN se reune 

0 Conselho Nacional de Infor- 
m£tica e Automapao Industrial 
(CONIN), composto de 24 mem- 
bros sendo 16 Ministros de Esta- 
do, realiza, ainda este m6s, a sua 
segunda reuniao executiva. 

A primeira reuniio, em maio, 
foi dirigida pelo Presidente da Re- 
piiblica Jos6 Sarney e teve como 
uma das principais resolupbes a 
suspensao dos incentivos fiscais e 
facilidades de import apao conce- 
didos 3 empresas de informitica 
local izadas na area da Zona Fran- 
ca de Manaus, de acordo com a 
Lei de Inform^tica que estabelece 
incentivos iguais para as industries, 
independentemente da local izap£o 
geogr£fica. 



(continua na p£g. 70) 
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A tradugao pode nao ser a melhor alternativa, mas algumas regras podem 
ajuda-lo bastante na conversao de seus programas entre os diversos... 



Dialetos BASIC 

Maria Sylvia Marques Abaurre 



A grande maioria dos microcom- 
putadores pessoais utiliza a 
linguagem BASIC. 0 nosso 
principal problema e a exist£n- 
cia de diferentes dialetos variantes do 
BASIC original, sendo urn para cada fa- 
milia de microcomputadores (TRS-80, 
Apple e Sinclair, as mais conhecidas no 
Brasil). Desta forma, urn programa es- 
crito seguindo o dialeto Apple fica pra- 
ticamente inutilizdvel, a menos que se- 
jam feitas algumas modifica95es, num 
computador TRS-80 e vice-versa. 

A tradugao consistiria na adapta^o 
de um programa escrito em um dialeto 
para outro diferente, desde que respei- 
tadas certas limita^Oes necessdrias. Esta 
traduqdo e uma tarefa um tanto ardua e, 
por vezes, o programa traduzido e qua- 
se que inteiramente di verso do original. 
Por conseguinte, 6 um bom passo para 
quern se inicia na programa 92 o de com- 
putadores porque da uma ideia globali- 
zada de como funcionam os comandos e 
instru95es da linguagem BASIC nas di- 
ferentes mdquinas. 

As primeiras tentativas de tradu 92 o 
funcionam, em sua maioria, na base de 
tentativas/erros e tentativas/acertos 
como um grande quebra-cabe 9 as, que 
nem por isso e impossivel de ser montado. 

Muitos programadores puristas argu- 
mentam que melhor seria nSo traduzir- 
mos programas, mas sim criarmos novos. 
Em parte, concordo com esta altemati- 
va porque nao creio que a tradu 9 ffo seja 
um fim em si mesma, mas um come 9 o 
para um bom programador. Assim, ao 
nos entregarmos ks tradu 90 es, come 9 a- 



mos a lidar com o programa como se 
fosse algo din5mico,modificando sub-ro- 
tinas, alterando partes, inserindo fun- 
9<5es e retirando outras consideradas su- 
perfluas. A partir daf, a confec 9 §o de 
programas proprios e quase que imedia- 
ta. 

PRfi-REQUISITOS 
PARA A TRADUgAO 

Quantidade de memoria disponfvel - Es- 
teeo principal item que se deve ter em 
mente antes de come 9 ar qualquer tipo 
de tradu 9 ^o. Seu computador deve dis- 
por da quantidade de memdria que a 
execu95o do programa exige. A tradu- 
9 fo de um programa que consome 32 
Kb para utiliza95o num Sinclair cuja ca- 
pacidade nko ultrapassa 16 Kb 6 comple- 
tamente inutil. 

Um conhecimento geral da linguagem 
BASIC — Adquirido principalmente 
atraves de cursos, da leitura de livros e 
revistas especializadas e da analise de di- 
ferentes programas em dialetos diversos. 
Bom senso - Suficiente para n£o adap- 
tar, por exemplo, um programa musical 
como os existentes para Apple e Com- 
modore 64 para um Sinclair, que conta 
com reduzidos recursos sonoros. 

Uma tabela de converslo - Para reco- 
nhecer as diferentes fun 90 es dos coman- 
dos e seus equivalentes em diferentes 
sintaxes. Uma tabela com a reuniJo dos 
comandos e instances mais conhecidas 
e seus equivalentes e apresentada neste 
artigo. 



BARREIRAS A TRADUgAO 

Programas em linguagem de mdquina - 

Para se fazer uma tradu93o neste nfvel, 
teriamos que estar de posse dos manuais 
e livros tecnicos de cada um dos micros 
e, ainda assim, sermos programadores 
bastante experientes, considerando a di- 
feren 9 a existente entre as mdquinas. 
Peeks e Pokes — Tais tradu 9 oes so serSo 
possiveis se voce tiver os respectivos ma- 
nuais dos diferentes micros, a n£o ser 
que suas fun95es venham explicitas nos 
respectivos artigos publicados, que elas 
sejam dispensdveis ao seu programa ou 
que voce conhe 9 a os equivalentes para 
seu micro. 

Exemplo: POKE 53281 ,1 :POKE 

53280,0 - mudan 9 a de cor das bordas 
e do fundo da tela do Commodore 64. 
Ora, caso seu computador n3o seja colo- 
rido, voce pode simplesmente eliminar 
esta linha sem qualquer prejuizo k exe- 
cu 9 ^o do programa. Se seu micro for co- 
lorido, voce poder£ usar seu proprio co- 
digo de cores. 

formata^Ao da tela 

O numero de linhas e colunas nos di- 
versos computadores e diferente e voce 
terd que fazer um rearranjo na posi93o 
que as palavras, numeros e/ou desenhos 
ocuparJo na tela, de acordo com o pro- 
grama. Para isto, e muito util o uso de 
tabelas como as que voce vai receber de 
brinde neste artigo. 

Vamos agora examinar o tipo de sin- 
taxe usada nas diversas familas, quando 
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Para uma llstagem mais completa solicite catalogo. 



ATI Produgao 
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Tabela A 



se deseja imprimir algo em um determi- 
nado local da tela. 

A famflia Sinclair usa principalmente 
a instru93o print at e segue a formula ge- 
ral PRINT AT L, C ; ,onde L significa li- 
nha e C coluna (esta conven^o sera usa- 
da ate o fim deste artigo). Veja a tabela 
3. 

Para traduzirmos este comando para 
um micro TRS-80, devemos procurar o 
numero correspondente ao ponto de in- 
terse 9 §o entre a linha e a coluna na ta- 
bela A eaplica-lo na formula geral PRINT 
@ , logo apos o simbolo @ 



Exemplo: Sinclair TRS-80 

PRINT AT 2,7; PRINT@142, 

onde 142 6 o numero encontrado na in- 
terse^So entre a linha 2 e a coluna 7, 
quando consul tamos a tabela A. 

Quando quisermos fazer a mesma tra- 
du^Jo do comando acima para um Apple, 
devemos usar a formula geral H-TAB 
C+1V-TAB L+l. Assim, o PRINT AT 
2,7; e o PRINT @142 do TRS-80 se tor- 
nariam H-TAB 8:V-TAB 3 PRINT, ao 
usarmos um Apple. 

Ao trabalharmos com um Commodo- 
re 64 ou com um VIC -20, poderiamos 
usar a seguinte formula geral: PRINT 
TAB(C)“[g]- tantas vezes quantas fo- 
rem o nftmero de linhas...”. No entan- 
to, esta f6rmula so poderd ser usada 
quando o numero de linhas for expres- 
so em algarismos absolutos. Neste caso, 
EQrepresenta a tecka CRSR I . EntSo, o 
PRINT AT 2,7; (Sinclair) seria conver- 
tido em PRINT TAB(7) 44 HEffl.. M » onde 
a tecla CRSR l seria pressionada duas 
vezes no interior das aspas antes da men- 
sagem a ser printada , pois o numero de 
linhas e igual a 2. 

Quando a tabula^o e feita usando-se 
expressOes num^ricas, a tradu^ao poderd 
ser feita atrav^s de um pequeno loop 
apresentado em seguida e cuja sintaxe se 
adapta a quase todas as famflias de mi- 
crocomputadores. 



FOR I = 1 TO L PRINT NEXT PRINT 
TAB(C) 

Neste caso, um PRINT AT J+K,X-Z; 
de um Sinclair se tornaria FOR I = 1 TO 
J+K:PRINT NEXT PRINT TAB(X-Z) 
para as outras famflias de microcompu- 
tadores (nos microcomputadores de 16- 
gica Sinclair devemos utilizar apenas 
uma instru^ao por linha). 

Encerrando estas observances sobre 
tabulando e formatando de telas, convem 
lembrar que praticamente todos os corr- 
putadores aceitam a instrundo PRINT 
TAB(C), para locarmos somente a colu- 
na, e a instrundo PRINT, para saltarmos 
uma linha em branco. 

Para facilitar a tradu^o como um 
todo, sugiro que voce tente fazer um 
fluxograma do programa a ser traduzi- 
do, para que possa seguir a linha de ra- 
ciocinio do programador. A repetinao 
deste artificio vai auxilia-lo bastante no 
desenvolvimento de tradunCes ou em 
suas futuras programanCes. 

Este artigo foi escrito a partir de pe- 
quenas observances e experiences acu- 
muladas em cinco meses lidando com 
um mesmo problema: o de tentar ade- 
quar ao meu Commodore 64, programas 
para computadores Sinclair, Apple e 
TRS-80. Espero que ele possa ser util a 
um grande numero de pessoas, ja que 
grande parte dos programas publicados 
em revistas brasileiras s5o escritos nes- 
ses tres dialetos. 



MIKROS 



• Microcomputadores Pessoais 

e Profissionais, Software, Suprimentos 
e Cursos. 

• Financiamento em ate 18 meses sem 
entrada e os pregos mais baixos do 
mercado. 

• Atendimento perfeito, profissionais 
treinados e habilitados para dar a voce 
a certeza de um bom Investimenta 



EQUIPAMENTOS 

Micros das linhas: TRS-80 • Apple • 
IBM • Sinclair • TRS-80 Color 
Impressoras* Videos • Interfaces • Etc. 



SUPRIMENTOS 

Formulario Continuo • Disquetes • 
Fitas • Mesas • Etiquetas • Etc. 



SOFTWARE 

Nacionais e Importados mais 
de 2.000 programas e 
jogos de todas as linhas. 



CURSOS 

Basic • Basic Avan^ado e DOS. 



Av. Ataufo de Paiva, 566 
sobreloja 211 e 202 
Rio de Janeiro - R.J. 
Tels.: (021) 239 2798 e 511 0599 



Fita Impressora Nadonal ou importada 

Ugue 2744845 

Formul&rio Continuo 1, 2 ou 3 was 

Ugue 2744845 

Aquele Arquno para diskettes 5. 1/4" ou 8" 

Ugue 274-8845 

Pastas para Ustagens 80 e 132 cokinas 

Ugue 2744845 

Etiquetas Adesivas em Formuiino Continuo 

Ugue 2744845 



Diskettes 5. 1/4 " ou 8" (5 anosde 

Ugue 



Reebobinagem em Nylon e PoketHeno 

Ugue 274-88451 



N6s temos tudo isso, e muito mais... 

* Pronta Entrega 

* Oualquer Ouantidade 

i * Garantia de Oualidade 



Maria Sylvia Marques Abaurre 6 bidloga, pos- 
sui cursos de linguagem BASIC e Co bo I eatual- 
mente utilize um Commodore 64. 
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EM-1275 

Multimodem - O modem 
profissional tambem 
para micro. 



A ELEBRA esta langando o MULTIMODEM 
- o modem que vale por ties. Urn equipamento profissional que 
voce tambem podera usar no seu micro. 

Ele opera em 300 bps, 1200 bps e 1200 bps com canal se- • | 

cundario de 75 bps, para que voce tenha a liberdade de in- 
terligar-se a qualquer rede de comunicagao de dados ou 

qualquer Tele-servigo. I 

EM- 1275 MULTIMODEM. A alta tecnologia em modem, 
multiplicada por ties. Para voce ter liberdade total de escolher 
a melhor maneira de se comunicar. 

Modems ELEBRA. Produtos com passado, presente e muito future. 



• Resposta automatica (opcional) 

• Opera em linhas comutadas ou de- 
dicadas a 2 ou 4 fios 

• Versao mesa ou bastidor 

• Desconexao automatica ao termi- 
nodatransmissao - 

• Loops (opcional) 

• Padrao de teste 
•Chavevoz/dados 

• Segue as recomendacoes CCITT e 
TELEBRAS. 



elebra telecon 



Ycndas: Av. Eng. Luiz Carlos Berrini, 1461, 

Sao Paulo - SPCEP 04571 - Fone (Oil) 533-9977 
Telex (01 1)25131 

Filial Rio: Av. Rio Branco, 50 -11." andar, CEP 20090 
Fones (021 ) 233-0223/233-2220/233-3977. 



A ELEBRA S.A. - AV. RIO BRANCO, 50- 11." AND. -CEP 20090 -RIO DE JANEIRO - RJ 



□ Solicitooenviodefolheto 

□ Solicit© visita de um Represen tante 



Nome 

Empresa 

Endere<;< 

Telefone 






Criptoaritmetica e uni jogo para Sinclair, onde 

o computador codifica operates matematicas para voce, decodificar 
em um numero minimo de tentativas 



Crip toari tm etica 

Jorge Alberto Correia Bettencourt Soares 



P ara quem gosta de numeros, a 
Criptoaritmetica pode revelar- 
se um passatempo fascinante, 
cuja estrutura e visual lembram 
vagamente as palavras cruzadas. £ segu- 
ramente um jogo inteligente, capaz de 
agu^ar a aten^ao e desenvolver o racioci- 
nio logico do aficionado. 

A Criptoaritmetica consiste na reso- 
lu 9 ao de opera95es aritme'ticas onde os 
algarismos foram substituidos por letras 
do alfabeto ou outros simbolos, o que 
leva a decifra^ao do codigo utilizado ori- 
ginalmente para formular o problema. 
Cada opera^ao considerada individual- 
mente e' denominada criptograma. 

A expressao Criptoaritmetica foi in- 
troduzida em 1931, no periodico belga 
Sphinx, embora tenham-se registrado 
apari^Ses esporadicas de enigmas de 
criptoaritmetica antes dessa epoca. Pou- 
cos anos mais tarde, em 1935, na cidade 
de Bruxelas, durante o I Congresso In- 
temacional de Recrea95es Matematicas, 
o matematico belga Pegeolet lan 9 ou os 
fundamentos da criptoaritmetica tal co- 
mo e hoje conhecida. 

Este programa, para micros da linha 
Sinclair, gera testes de criptoaritmetica 
que consistent de series de opera9(5es 
(de ad^do, subt^do, multiplica 9 ao ou 
divisao), permitindo ao operador viajar 
confortavelmente pelos domfnios da 
Criptoaritmetica, familiarizando-se com 
suas leis e acidentes pcculiares. 

Rodando o programa aparece o menu 
que possibilita escolher o Xipo de ope- 
ra 9 ao aritmetica: pressionando a tecla 
K serao gerados criptogramas de adi 9 ao; 
teclando J teremos subtra 90 es, e assim 



por diante. Passados alguns instantes, 
sera impresso o primeiro criptograma, 
isto d, uma opera 9 ao aritmetica onde os 
algarismos foram substituidos por letras 
de acordo com um codigo randomico. 

0 objetivo agora e' ir substituindo, 
uma a uma, as letras pelos algarismo cor- 
respondentes, utilizando te'cnicas ou me- 
todos de criptoanalise (veja na figura 
1 as regras fundamentals da criptoanali- 
se). 

Na se 9 ao inferior da tela do monitor 
sao impressos dois tipos de mensagens. 
No canto inferior direito, aparece a 
mensagem “CRIPTOGRAMAS : n”, sen- 
do “n” o numero de criptogramas ja exi- 
bidos ate o momento. No canto inferior 
esquerdo aparecem conjugadamente as 
mensagens “Letra?” e “Digito”, que co- 
mandam a entrada de dados para a solu- 
9 ^o dos criptogramas. Por exemplo, se 
tenho na tela um criptograma que pos- 
sui tres letras M e quero substitui-las 
pelo algarismo 7, fa 90 o seguinte: se a 
tela exibe a mensagem “Letra?”, pres- 
siono a tecla M. Em poucos segundos, 
sera impressa a mensagem “Digito ?” e 
entao eu aciono a tecla 7. A tela sumird, 
voltando um pouco mais tarde com a 
substitute realizada. 

Na pratica e raro conseguirmos subs- 
tituir todas as letras com base na analise 
de um uni co criptograma. Sera necess^- 
rio, portanto, comandar a impressao de 
criptogramas adicionais; cada vez que 
acionarmos a tecla NEW LINE (ou 
ENTER) sera exibido mais um cripto- 
grama na tela, e o numero de criptogra- 
mas impresso no canto inferior direito 



da tela sera incrementado de uma uni- 
dade. O elemento de desafio do jogo 
consiste em resolver o problema gastan- 
do o menor numero possivel de cripto- 
gramas. 

Teclando SHIFT e Z quando esta sen- 
do exibida a mensagem “Letra ?”, sera 
revelado o codigo que o computador 
utilizou para montar o teste que esta sen- 
do processado. 

Para iniciar um novo ciclo de proces- 
samento, com a gera 9 £o de um novo 
teste, basta teclar SHIFT e A em resposta 
a mensagem “Letra ?”. 

Parece dificil? Mas nao d,c nada me- 
lhor do que um exemplo pratico para se 
compreender como a coisa funciona. 

UM TESTE SIMULADO 

Para que o leitor possa acompanhar 
do inicio ao fim toda a filigrana envolvi- 
da na solu 9 ao de um teste de cripto- 
aritm^tica, utilizaremos um truque que 
consiste em substituir criptogramas gera- 
dos aleatoriamente pelo computador 
por outros que ser5o fomecidos pela ro- 
tina iniciada na linha 9000. Vamos Id? 

Voce ja carregou o programa e agora 
inicia o processamento com um RUN. 
Logo aparece o menu e voce tecla K pa- 
ra induzir a gera 9 do de criptogramas de 
adi 9 do. A imagem sumird da tela e re- 
tomara alguns segundos apds com o 
primeiro criptograma aleatririo impresso 
no canto superior esquerdo do video. 
Agora vamos ao truque, substituindo 
este criptograma por um outro que nos 
sera de maior utilidade para a compreen- 
sdo do programa. Para isso de um 
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As regras fundamentals da Criptoanalise 




Figura / 

BREAK e logo em seguida GOTO 9000. 
A imagem sumira, voltando momentos 
apos com este criptograma em substi- 
tute ao que estava la: 

X C A K 

+ J R K R 

R A F A F 

Para facilidade de referenda, vamos 
convencionar a numera^o das colunas, 
ordenando-as da direita para a esquerda. 
Assim, temos na coluna 1 K + R = F; na 
coluna 2A + K = Ae assim sucessiva- 
mente. 

Na coluna 5, aplicando a regra II (ve- 
ja as regras na figura 1), descobrimos 
que R = 1. Ja podemos substituir esta 
letra, teclando inicialmente R, para 
atender & solicita^ao da mensagem 

“Letra ?” impressa no canto inferior es- 
querdo da tela. Logo ap6s, quando 

aparecer a mensagem “Digito ?” tecla- 
mos 1 . Apos um breve periodo sem tela, 
teremos: 

X C A K 

+ J 1 K 1 

1 A F A F 



Muito bem, uma espiada na coluna 2 
sugere que se A + K = A entSo K = 0 ou 
K = 9 (regra III). Mas veja na coluna 1 
que, se K = 0, em vez de K + 1 = F teria- 
mos K + 1 = 1, nSo e mesmo? Portanto 
K = 9 com certeza, e conseqiientemente 
tambdm ja temos conduces de decifrar 
o F na coluna 1, considerando que se 
9 + 1 = F, entao F = 0 e “vai um" para 
a coluna 2. Correto? 

Temos agora duas letras para substi- 
tuir: K e F. Iniciamos teclando K e logo 
em seguida 9. O monitor ficara algum 
tempo sem imagem enquanto e feita a 
substitui 9 §o de todas as letras K por di- 
git os 9. Depois, quando aparecer nova- 
mente a mensagem “Letra ?” digitamos 
F e posteriormente 0. 

O resultado visivel das duas substi- 
tutes serri: 



X C A 9 



+ J 1 9 1 

1 A 0 A J3 



Da para perceber que houve transpor- 
te (“vai um") da coluna 1 para a coluna 
2, e da coluna 2 para a coluna 3. Olhan- 
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CRIPTOARITMgTICA 



do agora para a coluna 3, podemos afir- 
mar que C + 1 + transpose = 10, donde 
se conclui que C = 8. Tranqiiilo? 

Teclando C e posteriormente 8, para 
as devidas substitutes, ficamos com o 
seguinte quadro: 

X 8 A 9 
4 J 1 9 1 




Figura 2 



1 A 0 A 0 

Agora estamos empacados , ja que 
n§o hi quaisquer elementos que possibi- 
litem decodificar as letras A, X e J. 0 
jeito d pedir um segundo criptograma 
teclando NEW LINE (ou ENTER). A 
tela apresentara agora a seguinte confi- 
gura^ao com a entrada do segundo cripto- 
grama : 

X 8 A 9 U A 1 U 

4 J 1 9 1 4 9 A 0 X 

1 A 0 A 0 1 H X A 0 

Note que no segundo criptograma 
as letras ja decodificadas tambem foram 
devidamente substituidas. Observando a 
coluna 2 do segundo criptograma veri- 
ficamos que se 1 + 0 + transporte da 
coluna 1 = A, entao A = 2. Isto nos 

permite tambem deduzir que na coluna 
3 X = 4, pois se A 4 A = X e A = 2, en- 
taoXM. 

Agora temos mais duas letras para 
substituir e teclamos A e 2, e, numa ou* 
tra etapa, X e 4. Feitas as substitutes, 
a tela Fica assim: 

4829 U 2 1 U 

4 J 1 9 1 4 9 2 0 4 

12020 1 H 4 2 0 

Dando uma olhada na coluna 4 do 
primeiro criptograma, podemos deduzir 
que J = 7, correto? Assim ma tamos o 
primeiro criptograma e podemos fazer 
mais uma substituto digitando J e 7. 
Na tela temos entao: 

4829 U 2 1 U 

4 7 1 9 1 4 9 2 0 4 

12020 1H420 

Finalmente, a coluna 1 do segundo 
criptograma evidencia que U = 6. Se 
U = 6 entao podemos garantir, na colu- 
na 4, que H = 5. Assim liquidamos o se- 
gundo criptograma. Substituindo as 



duas ultimas letras, o teste termina com 
a tela mostrando: 

4829 6216 

4 7 1 9 1 4 9 2 0 4 

12020 15420 



Note que, na parte inferior direita da 
tela, temos a mensagem “CRIPTOGRA- 
MAS:2", significando que gastamos dois 
criptogramas para resolver este proble- 
ma. O codigo que o computador utili- 
zou para formular o problema foi: 
F = 0, R = 1, A = 2, N = 3, X = 4, 



variAveis do programa 



C$ ( 2 1 , 5) Armazena um maximo de 21 registros. Cada registro corres 
ponde a um numero de 2 a 5 algarismos utilizado para a 
montagem das operagdes aritmeticas (criptogramas). A me- 
dida que prossegue a solugao do teste de cr iptoar itmetica , 
os algarismos de oada registro vao sendo substituidos por 
letras, de acordo com um codigo 

F$(10,1) Armazena um codigo randomico de 10 letras correspondentes 
aos digitos 0 a 9. Assim, F$(l) corresponde ao 0 , F$(2) 
ao 1, e assim sucessivamente 

A$ Armazena o simbolo teclado para definir o tipo de operagao 
aritmetica 

B$ Armazena a serie de digitos de 0 a 9, os quais vao sendo 
substutidos por asteriscos cada vez que e teclada uma le- 
tra do codigo 

H$ Armazena o simbolo teclado em resposta a mensagem "LETRA 
?" 

1$ Armazena o simbolo teclado em resposta a mensagem w DIGITO 
?« 

K$ Armazena os dados necessarios para simular um teste de 
criptoaritmetica, usado para a compreensao deste artigo 

D$,E$,G$,J$ Areas de trabalho 

A,B,C,D,E,F,G Numeros randomicos utilizados para montagem dos cripto- 
gramas 

H Enderego de retorno em caso de tela cheia, para desloca 
mento dos criptogramas a esquerda e entrada de um novo 
criptograma no final da serie 

I Enderego de retorno ao bloco de instrugoes PRINT que 
exibe na tela uma serie de criptogramas 

J Numero de criptogramas que ja foram exibidos na tela desde 
o inicio da solugao do teste 

K Define quantos numeros (registros da string C$) estao sen 
do utilizados nos criptogramas que estao sendo exibidos 
na tela. 

L Define quantos numeros (registros da string C$) sao neces 
sarios para montar um criptograma. L«3 para adigao e 
subtragao; L»5 para multipl icagao e L=7 para a divisao 

M Define quantos numeros (registros da string C$) cabem na 
tela. M=2 1 para adigao, subtragao e divisao; M=20 para a 
multiplicagao 

N,P,R Contadores de loop 

T Controla a posigao do inicio da armazenagem de numeros 
(ou letras correspondentes) na string C$ . Em condigao 
normal T=1, porem, quando a tela enche T e alterado para 
desviar para o final de C$ a inclusao do numero de regis 
tros correspondente a um novo criptograma 

U Define a linha utilizada em instrugoes PRINT 

Z Define a coluna utilizada em instrugoes PRINT 
S,X Areas de trabalho 
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ROTEIRO DO PROGRAMA 



H = 5, U = 6 , J = 7, C = 8 , K = 9. O 
computador revelard este cddigo se voce 
teclar SHIFT e Z quando estiver sendo 
exibida a mensagem “Letra V\ 

No exemplo dado anteriormente, 
conseguimos decifrar o codigo utilizan- 
do apenas dois criptogramas, mas isso 
foi propositadamente arranjado para 
simplificar a demonstra^ao. Na prdtica, 
e preciso analisar, digamos, de cinco a 
dez criptogramas de adi^o para decifrar 
um codigo. E nao e raro termos que tra- 
balhar 15 ou mais criptogramas para so- 
lucionar um teste. Isto varia de um pro- 
blema para outro e depende tambem do 
nivel de experiencia do aficionado. 

A dinSmica para S 0 IU 920 dos testes 
de criptoaritmetica segue em linhas ge- 
rais a seqiiencia observada no exemplo 
dado anteriormente. Normalmente se 
come^a desvendando as letras corres- 
pondentes ao 0, 9, 1 e 5 que sao os alga- 
rismos mais fdceis de se identificar, e a 
partir dai se consegue matar as letras 
restantes. A maior dificuldade esta em 
decifrar as 3 ou 4 primeiras letras, ja 
que a partir dessa “massa critica”, se 
assim poderi'amos chama-la, o processo 
deslancha e progride rapidamente. 

Se voce estiver errado ao fazer a 
substitu^ao de uma letra por um digi- 
to, o computador se recusara a executar 
a substitu^ao, imprimindo no centro 
da tela a mensagem “SUBSTITUIQAO 
INCORRETA”. Tambem quando o pro- 
grama pede “Letra?", se voce digitar 
por engano um algarismo ou outro si'm- 
bolo, ou vice-versa, se o programa pede 
“Digito ?” e voce tecla uma letra, o 
programa ignorara essa entrada invalida 
de dados, e insistira na solicita 93 o origi- 
nal. 

Voce vai observar tambem que, quan- 
do a tela enche e voce pede mais um 
criptograma o programa desloca a es- 
querda a serie de criptogramas que es- 
tava no video, introduzindo um novo 
final da serie. 

CA£A AOS CRIPTOGRAMAS 

Denominamos aqui de criptograma 
perfeito aquele que e completo em si 
mesmo, ou seja, utilizando um unico 
criptograma voce consegue decifrar to- 
das as letras que o formam. 

Quando se trabalha com multiplica- 
9 < 5 es e divisOes, a lei do acaso faz com 
que eventualmente a gente tropece em 
criptogramas perfeitos. Um exemplo 
de criptograma perfeito e o seguinte 
classico da literatura criptoaritmetica: 

SEND 
+ M 0 R E 
M 0 N E Y 



10 


a 


170 


180 


a 


570 


1000 


a 


1380 


2000 


a 


2460 


2500 


a 


2580 


3000 


a 


3070 


3500 


a 


3590 


4000 


a 


4040 


4500 


a 


5020 


4800 


a 


4840 


4850 


a 


4900 


4910 


a 


4980 


4990 


a 


5020 


9000 


a 


9080 



Inicializagao 

Bloco para montagem das operagoes de adigao e subtragao 

Bloco para montagem das operagoes de multiplicagao 

Bloco para montagem das operagoes de divisao 

Gera um codigo randomico de 10 letras, correspondentes 
aos digitos 0 a 9, armazenando-o na variavel F$ (10,1) 

Armazena na variavel C$(21,5) os numeros utilizados 
para montar as operagoes aritmeticas 

Substitui todos os digitos armazenados em C$ pelas 
letras correspondentes do codigo 

Armazena na variavel X o numero de caracteres' alfanume- 
ricos existentes num campo de 5 posigoes 

Gerencia as opgoes de resposta as mensagens "LETRA ?" e 
"DIGITO ?" impressas no canto inferior esquerdo da tela 

Coloca mais um criptograma na tela 

Se a tela fica cheia, desloca a esquerda os criptogra- 
mas existentes, eliminando o primeiro e introduzindo um 
novo no final da serie 

Revela o codigo utilizado para a montagem dos criptogra 
mas 

Imprime a mensagem "SUBSTITUI^AO INCORRETA" 

Simula um teste de criptoaritmetica composto de 2 cripto 
gramas de adigao, utilizado como exemplo neste artigo 



E aqui estao mais dois criptogramas 
perfeitos descobertos por acaso durante 
nossas investidas de fim-de-semana. 



B N A 
B T 
B N A 
WARY 
V N Y Y A 



L Q J V R 

V S S 

V Q L R 
S W I S 

R L W 



| V S S 
L I 



Uma observa 9 §o final. As regras da- 
das na figura 1 sao as mais simples e 
uteis para o inicio dos trabalhos de 
decodifica 9 ao de criptogramas. Cada 
um, posteriormente, ira completando 
seu arsenal de regras e macetes e, em 
pouco tempo, ficara surpreso com o 
sucesso alcan 9 ado. 

As solu 9 oes dos tres criptogramas 
perfeitos apresentados anteriormente es- 
t5o na figura 2 . 

O programa, com suas varidveis e 
arquivo da tela de TV, ocupa 6.207 
bytes de memoria. 

CONVEN^OES E OBSERVANCES 
(DA FIGURA 1) 

1 ) Em cada modelo a numerate das 
colunas faz-se da direita para a esauer- 
da. Assim, PDP constitui a coluna 1 do 
modelo 1 ; HNW a coluna 2 do modelo 1 
e assim por diante. 

2) Para fins didaticos, a letra D ia 
foi substituida por 0 nos modelos 2 e 3. 
Tambem substituiu-se o F por 7 no mode- 
lo 4, e o N por 9 no modelo 5. 

3) Por entenda-se a letra R lo- 



calizada na coluna 3, linha 2. 

4) Para facilitar a analise, convem 
visualizar as substra 90 es como adh^Oes 
as avessas. Assim, a subtra 9 <to do modelo 
3 pode ser transformada na ad^ao 
SFFN + HNZOH = FPYYW. 

5) Foi utilizado um codigo unico na 
montagem dos criptogramas dos modelos 
1 a 6 . O codigo e: D = 0; Z = 1 ; R = 2; 
P = 3;S=4;W = 5;H = 6 ;F =7;Y = 8 ; 
N =9. 
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CRIPTOARITMgTICA 



Criptoaritmetica 



10 PEM CRIPTOARITMETICA 
20 PEM MICRO 5ISTEMAS - JACB5 
30 RAND 

40 DIM C$121. 5) 

50 DIM F $ i 1 0 , 1 ) 

60 PRINT AT 7.5. "T IPO DE OPERA 
CAO TAB 10; "K" ; TAB 15. A 

DICAO" . TAB 10 , ” J" , TAB 15"SUBT 
RACAO " , , ,TAB 10 "B TAB 15, ' MUuT 
IPLICACAO" , . TAB 10."U",TAB 15 
DIUISAO" 

70 IF INKEY$= ’ THEN GOTO 70 
30 LET A$ = INKEY $ 

90 IF AS-' > "K " AND A$o"d a ‘ AND 
A$ >”6 AND A$ < > "U" THEN GOTO ’’O 
100 FAST 
110 CLS 

120 LET B$ = ’0123456789" 

130 LET J=1 
140 i_ET T = 1 
150 GOSUB 2500 

160 IF h$= B” THEN GOTO 1000 

170 IF A$= U THEN GOTO 2000 

180 LET H =250 

190 LET 1=360 

200 i_ET K =3 

210 LET L =3 

220 LET M=21 

230 IF A$= “K" THEN LET 5 = 10000 
240 IF h$= J THEN LET 5=100000 
250 FOP N=T TO M STEP L 
260 LET A=INT iRND*S) 

270 IF A <5 / 10 THEN GOTO 260 
280 LET B = INT i RND *5 ) 

290 IF B < 5/ 10 THEN GOTO 280 
200 IF A$ = 1 J" AND B =A THEN GOT 
0 540 

210 IF A$="K" THEN LET C=A+B 

320 IF A$ = " J THEN LET C=A-B 

330 GOSUB 3000 

340 NEXT N 

350 GOSUB 3500 

360 LET U =4 

370 IF A$="K" THEN LET Z = -5 

380 IF A$= ’J" THEN LET Z = -6 

390 FOR N = 1 TO K STEP L 

400 LET Z=Z+0 

410 IF N = 13 THEN LET U = 12 

420 IF N = 13 AND A* = ’’K’’ THEN LET 

Z =6 

430 IF N = 13 AND A $ = " J " THEN LET 
Z =5 

440 PRINT AT U.Z.CSCN) 

450 PRINT AT U+l.Z-1. ’+";C$(N+1 

) 

460 IF A $ = '* U " THEN PRINT AT U + l 
.Z-l. AT U+2 . Z +4 , 

470 PRINT AT U+2.Z-1;" " 

480 LET D$=C$ < N + 2) 

490 GOSUB 4000 

500 IF A$= ’K” THEN PRINT AT U + 3 
.Z+4-X, D$ 

510 IF Afa-J’’ THEN PRINT AT U + 3 
,Z+5-X. D$ 

520 NEXT N 
530 GOTO 4500 
540 LET X = A 
550 LET A =6 
560 LET B=X 
570 GOTO 320 
1000 LET H = 1050 
1010 LET 1=1130 
1020 LET K =5 
1030 LET L =5 
1040 LET M =20 
1050 FOR N=T TO M STEP L 
1060 LET A=INT <RND+1000) 

1070 IF A <100 THEN GOTO 1060 
1080 LET B = INT 1 RND* 100) 

1090 IF Bfl0 THEN GOTO 1080 
1100 LET E$=5TR$ B 
1110 IF UAL E$ l2) =0 THEN GOTO 10 
80 

1120 LET C=UAL E$(2)*A 

1130 LET D =UAL E$(1)*A 

1140 LET E=A*B 

1150 GOSUB 3000 

1160 NEXT N 

1170 GOSUB 3500 

1180 LET U = 1 

1190 LET Z = -5 

1200 FOR N = 1 TO K STEP L 



1210 lET Z =Z + 12 

1220 IF N = 1 1 THEN LET U = 12 

1230 IF N = 1 1 ThEN LET z = ? 

1240 PRINT AT U.Z+2;C$(N) 

1250 PRINT AT U*1 . Z*3 ; C$ lN + 1) 

1260 PRINT AT U+2.Z+1;" " 

1270 ,.ET D$=C$ (N+2) 

1280 GOSUB 4000 

1290 PRINT AT U+3 , Z *5-X ; D$ 

1300 LET D$=C$ (N + 3.1 

1310 GOSUB 4000 

1320 PRINT AT U44.Z44-X.DS 

1330 PRINT AT U*5 . Z . " ” 

1340 LET D$=C$ < N + 4 » 

1350 GOSUB 4000 

1360 PRINT AT U46.Z45-X.DS 

1370 NEXT N 

1380 GOTO 4500 

2000 LET H=2050 

2010 lET 1=2220 

2020 LET K =7 

2030 ^ET l =7 

2040 M =2 1 

2050 P 0R N=T TO M STEP L 

2060 lET A=INT RND* 1000 

2070 IF A <100 then GOTO 2060 

2030 LET E=INT =RND*100J 

2090 IF B < 11 THEN GOTO 2080 

2100 LET ES=5TP$ B 

2110 IF UAL E$ (2 J =0 THEN GOTO 20 

80 

2120 LET C=A4UAL ES(1) 

2130 LET D=A*UAL ES (2) 

2140 LET E=INT <A*RND) 

2150 LET F=A*B4E 

2160 LET E$=STPS F 

2170 IF F >9999 THEN LET G =UAL ES 

Cl TO 4) -C 

2180 IF F < =9999 THEN LET G =UAL E 

SCI TO 3 i -C 

2190 GOSUB 3000 

2200 NEXT N 

2210 GOSUB 3500 

2220 LET U = 1 

2230 LET Z = - 12 

2240 FOP N = 1 TO K STEP L 

2250 LET Z =Z 4 14 

2260 IF N = 15 THEN LET U = 13 

2270 IF N=15 THEN LET Z=10 

2280 LET DS«C$lN+5) 

2290 GOSUB 4000 

2300 PRINT AT U.Z45-X.DS TAB Z + 6 
' " TAB Z 4 7 , C $ ' N ) . AT U43.Z44.DS 

(X) 

2310 LET D$=C$lN*2' 

2320 GOSUB 4000 

2330 PRINT AT U*1 , Z + 4-X, D$ : TAB Z 
46 " ’’ 

2340 PRINT AT U42.Z,’’ " TAB 

Z*7, CS(N4l) 

2350 LET DS=C$(N+6> 

2360 GOSUB 4000 

2370 PRINT AT U43 , Z44-X; DS < TO X 

) 

2380 LET DS=C$CN*3) 

2390 GOSUB 4000 

2400 PRINT AT U44.Z45-X.DS 

2410 PRINT AT U+5.Z+1" " 

2420 LET D$=C$ CN44) 

2430 GOSUB 4000 

2440 PRINT AT *J46,Z45-X;D$ 

2450 NEXT N 
2460 GOTO 4500 
2500 FOR N = 1 TO 10 
2510 LET 5 = INT < RND *26 > 

2520 lET X =38 45 
2530 FOR P=1 TO N 

2540 IF F $ C P ) =CHR $ X THEN GOTO 2 
510 

2550 NEXT P 

2560 LET FS(N)=CHRS X 

2570 NEXT N 

2530 RETURN 

3000 LET CS(N)=STRS A 

3010 LET CS<N4l)=STRS B 

3020 LET C S t N42 ! =STR $ C 

3030 IF L > =5 THEN LET C$<N*3)=ST 

RS D 

3040 IF L > =5 THEN LET CSCN*4)=ST 
RS E 

3050 IF L =7 THEN LET C$<N45)=STP 

S F 



3060 IF L =7 THEN LET CS<N+6)=STP 

$ G 

3070 RETURN 
3500 FOR N=T TO M 
3510 LET GS=CSCN) 

3520 FOR P=1 TO 5 
3530 FOR P=1 TO 10 

3540 IF G$ 1 P > =6$ (R ) THEN LET GS c 
P) =F S ( R ) 

3550 NEXT R 
3560 NEXT P 
3570 LET CS(N)sGS 
3580 NEXT N 
3590 RETURN 
4000 LET X=0 
4010 FOP P=1 TO 5 

4020 IF DScPjo" " THEN LET X*X4 
1 

4030 NEXT P 
4040 RETURN 

4500 PRINT AT 21, 16; "CRIPTOGRAMA 

4510 PRINT AT 21.0; "LETRA ?" 

4520 SLOW 

4530 IF. INKEY $ = "" THEN GOTO 4530 
4540 LET MS= INKEYS 
4550 CLS 

4560 IF CODE H$=11S THEN GOTO 48 
00 

4570 IF CODE H$=227 THEN GOTO 60 
4530 IF CODE H$=14 THEN GOTO 491 
0 

4590 IF CODE H$ < 38 OR CODE H$>63 
THEN GOTO 4510 

4600 PRINT AT 21.0. "DIGITO ?" 

4610 IF INKEY $ = " " THEN GOTO 4610 
4620 LET I $ = INKEY $ 

4630 IF CODE IS ‘37 OR CODE IS <28 
THEN GOTO 4610 
4640 FAST 
4650 CLS 

4660 FOR N = 1 TO 10 

4670 IF F $ C N > =H$ THEN GOTO 4700 

4680 NEXT N 

4690 GOTO 4990 

4700 IF I$oB$(N) THEN GOTO 4990 
4710 FOR N=1 TO M 
4720 LET J$=CSCN) 

4730 FOR P=1 TO 5 

4740 IF JS'P'=HS THEN LET J$<P'= 

IS 

4750 LET CS <N) =JS 
4760 NEXT P 
4770 NEXT N 

4780 LET BSCUAL IS + l)=•'* ,, 

4790 GOTO I 

4800 FAST 

4810 LET J=J+1 

4820 LET K =K +L 

4830 IF K > M THEN GOTO 4850 

4840 GOTO I 

4650 LET K =K-L 

4860 FOR N = 1 TO M-L 

4370 LET CS (N> =C$ (N-fL) 

4880 NEXT n 

4890 LET T=M-L+1 

4900 GOTO H 

4910 FOR N = 1 TO 10 

4920 PRINT FS (N) ,"="; N-l, ,, , 

4930 NEXT N 

4940 PRINT AT 20 . 0; "CONT INUA COM 
" • , "OUALOUEP TECLA" 

4950 IF INKEY $ = '* " THEN GOTO 4950 
4960 FAST 
4970 CLS 
4980 GOTO I 

4990 PRINT AT 10 , 5, " SUBSTITUICAO * 
INCORRETA 
5000 SLOW 
5010 PAUSE 60 
5020 GOTO 4960 
9000 FAST 

9010 LET K$="4829 7191 120206216 
9204 15420FRANXHUJCK” 

9020 FOR N = 1 TO 6 

9030 LET CSCN) =K$ CN*5-4 TO N*5) 

9040 NEXT N 

9050 FOR N = 1 TO 10 

9060 LET F$CN) =K$(N+30) 

9070 NEXT N 

9080 GOTO 350 ■ 

m 






ngpnDjaEinp 



Loyal 



Catdlogo O Vendedor D 



Moore Formulbrios Ltda 



Eu desejo receber: 



Empresa 



Nome: 



Cidade: 



Quandq uriypwButo tem a Garanlia Moore, quern 

est£ garanlido i voce. 

Por isso, a o util zar uma Fita Impressora Loyal, 
saiba que, por detras de sua excelente qualidade, 

perfeito equillbrio nylon / ■ 

custo benaffKio do mercarMe p*^^rm,lf|(x*Jk» 
regenerli^ invejdvel, esllo 
FORNECEuOR TOTAL P»A INI Oj^MATlCArjo p 
S3o rr iais r:e 50 Filiais de JendaU a r k aS^ortipleta 
rede <je Uljas de Inform^ tic a, senu^ peitt ode vocfi 
Ligue-nas e conherpaas Fitas ImpressAfrfoyal. 

A r^HItia Moore eseguranga e qualidade em 
totM harrnonia. 



FITAS PARA; 
IBM 1403 3203 



Globus 
Globus BIB 
* Globus M 30 0 
Epson bH 
Epson ERC0« 
Epson MX 80/Graf ix 80/P5< 0 
O $ume Polyma J 
7 Elebra Alice 



IBM 321 1 



Cobra 2230 
Burroughs 9240/3 
Burroughs 9246 
Burroughs 9247 
Digilab 8030/8060 
Elebra /Prolbgica P720 



Para maiores informagoes, ligue 
Na Grande S3o Paulo: 872-3316 
De outros locais: (011) 800-3316 
(nos pagamos seu interurbano) 



KjjgCVe e remeta pbr«x. Postal 984 Osasco SP 
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SHOPPING! 

MOORE 









PC’s UNI-VOS. 

DESTA REDE VOCE NAO ESCAPA. 



O TEL 2608 e o unico MULTI-USUARIO capaz de tormar uma rede entre micros de 16 
e 8 bits, com ate 8 estagoes de trabalho. A ele voce liga o TEL 2605 ET, PC, XT 
e os demais PC’s compativeis. 

O TEL 2608 opera com uma unidade Winchester de 67 MB e na hora de 
expandir o seu sistema, voce pode contar com o TEL 2616, que trabalha 
com duas unidades Winchester de 67 MB e 16 estates. 

Entre nesta rede, desta voce nao escapa. 





TEL I800A: 

• Processador Z80A 4 MHZ. 64 KB de 
RAM e 4 KB de EPROM. 

• 2 portas seriais RS-232C sincronas ou as- 
sincronas. 

• 1 porta RS-422 com taxa de 800 Kbits 
p/segundo. 

• Video 12” de fosforo verde. Texto e gr&- 
fico de media resolugao com tela de 24x80 
caracteres e 25? linha estado/usu^rio. 

• Teclado destacavel com numerico redu- 
zido com 1 1 teclas de fungSo programa- 
veis. 



TFL 1802: 

• Processador Z80A 4 MHZ. 64 KB de 
RAM e 4 KB de EPROM. 

• 2 portas seriais RS-232C sincronas ou as- 
sincronas. 

• 1 porta RS-422 com taxa de 800 Kbits 
p/seg. 

• video 12” de fosforo verde. Texto e gfa- 
fico de media resoluc'So com tela de 24 x 80 
caracteres e 25 a linha de estado/usuario. 

• 2 unidades de disco flexiveis 5 1/4” 48 
TPI 360 KB formatos por unidade ou na 
v£rsao 1802D com 1 disco flexivel e 1 disco 
rigido Winchester 5 1/4” de 19.14 MB. 



TEL 1806: 

• Processador Z80A 4 MHZ 64 KB de 
RAM. 

• 2 portas seriais RS-232C sincronas ou as- 
sincronas. 

• 1 porta paralela padrao Centronics 

• 6 portas RS-422 com taxa de 800 Kbits. 

• 1 unidade de disco flexivel 51/4” 360 K B 
formatado. 

• 1 unidade de disco rigido Winchester 5 
1/4 ” 19. 14 MB podendoser expandido ate 
38.28 MB. 
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Telsist 

Av. das Americas, 4430 — grupo 304 

Tels.: (021) 325-9300 — 325-4122 — 

Telex (021) 32625 ESTL — CEP 22600 

Rio de Janeiro — RJ 

Filial Rio de Janeiro 

Av. Rio Branco, 43 18° andar — 

Tel.: (021) 233-5722 — CEP 20090 
Filial S. Paulo: Av. Brasil, 1992 
Tels.: (011) 853-6457/852-9295 
CEP 01480 — Sao Paulo — SP 



TEL 2608: 

• Processador Intel 80186 8 MHZ e Z80A 
de 4MHZ. 

• 512 KB RAM, expandivel ate 1 MB. 

• 1 disco flexivel 5 1/4” com 360 KB for- 
matado. 

• 1 disco rigido Winchester 5 1/4” com 67 
MB. 

• 2 portas seriais RS-232 C com taxas de 50 
a 9600 bits p/segundo. 

• 1 porta paralela padrao Centronics. 

• 8 portas RS-422 com taxa de transmissao 
de 800 Kbits p/segundo e na versao 2616 
com 2 discos Winchester fazendo 134 MB, 
e 16 portas RS-422. 



TEL 2605: 

• processador Intel 8088 4.77 MHZ. Op- 
tional mais urn 8087. 

• 256 KB RAM expandivel ate 640 KE 

• na versao 2605 PC, 2 unidades de disco 
flexivel 5 1 /4” de 360 KB formatado ou na 
versao 2605 XT com 1 disco flexivel e 1 dis- 
co rigido Winchester 5 1/4” 12.75 MB. 

• 1 porta serial RS-232C e 1 porta paralela 
padrao Centronics. 

• Monitor de video 12” (RGB ou video 
composto) ajustavel com alta resolu<;ao 
grafica de 640 x 200 pixels. 

• Teclado destacavel, numerico reduzido, 
mais 10 teclas de fun^ao programaveis. 

• 5 slots de expansao padrao IBM. 











NAJA800. 
ESIE NAO RECUSA 
PROGRAMA 



Compativel com os Sistemas 

CP/M 3.0 -CP/M 2.2. - NAJA/DOS - 
DOSPLUS - NEWDOS/80 - 
LDOS -MULTI DOS - 
TRSDOS6.1 -TRSDOS1.3 




N\\]\800 



0 SUPERVERSATIL 



CARACTERiSTICAS TECNICAS: 

• Utiliza ate 4 drives de 51/4” ou 8". em 
face dupla ou simples. 

• Winchester de 5M , 10M ou 15M Bytes . 



• 128Kdemem6ria RAM, expansivel 
para mais512K Bytes. 

• Com patibi I id adeem soft ware com os 
computadones TRS-80, modelos IV, III , 
llel. 

• 24linhasde80ou40colunas. 

• Alta resolugao grafica com 640 x 24 0 
pontos. 

• Caracteres para representag&o grafica 
da linguagem APL. 



Conhega o NAJA 800, urn produto 
Kemitron. Entreem contatoconosco. 

im 

Av. Contorno. 6048 - Savassi - Fone (031) 
225-0644 - Telex (031) 3074 - KEMI - BR 
Belo Horizonte, MG. 
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PERGUNTA 



Estoucom prob/emas no programa FOR- 
MULA 1 , de setembro de 1983. Estou 
procedendo da seguinte forma: 

1 — Rodo o programa Monitor Assem- 
bler. 

2 — Crio a I inha REM necessaria. 

3 — Digito todos os numeros hexadeci - 
mais do b/oco Assembler. 

4 - Vo I to ao BASIC. 

5— Apago todas as linhas e digito o pro- 
grama da I is tag em BASIC. 

Ao rodar o programa , pe/a segunda 
vez, em um TK 85, ele a presen ta erro na 
I inha 1340 (memdria estourou) ou per- 
gunta se desejo mudar a velocidade. Se 
press i on o qualquer ted a o programa e 
executado nova men te ate esse ponto. 

Gostaria de poder obter me/hores es- 
c/arecimentos quanto ao Assembler, 
pois posso estar come ten do erros. 
Vanderlei MicheUtto — Campinas — SP 



MICRO SISTEMAS 



Realmente Vanderlei, voce esta come* 
tendo algum erro e pela sua carta fica di- 
ffcil saber exatamente onde, pois o seu 
procedimento parece correto. Vamos 
ent£o orienta-lo de forma que voce mes- 
mo possa encontrar a solugao: reveja 
todo o seu procedimento relendo o tex- 
to do programa. Procure por situagSes 
que poderiam dar margem a interpreta- 
goes erradas (como eliminar apenas as 
linhas inuteis) ou algum erro na digita- 
gao (apesar de todo cuidado eles aconte- 
cem com muita frequencia). 

Se ainda assim os problemas persisti- 
rem, procure trocar ideias com algum 
colega, para saber se ele estci tendo os 
mesmos problemas. 



PERGUNTA 



Voces poderiam me adiantar a/gumas in- 
forma goes? 

1) Como fago para PR INTAR no meio 
do video, por exemplo , o nome MICRO 
SISTEMAS ? (em Assembler) 

2) Como anu/ar o comando BREAK ou 
qualquer outro ? (o programa so pararia 
se des/igasse o micro) 

3) Como fazer para mudar o ca rater do 
cursor do TK? (ten ho sua fita MICRO 
BUG e voces se utilizam de um " £] ") 

4) Fa/ando em MICRO BUG, por que de 
vez em quando o comando E co/oca 
mais caracteres do que o necessJrio? 



5) Como ca/cular o in (do de uma REM 
no meio do programa? 

James Vassa/lo Donade/li —Jundia/'—SP 



MICRO SISTEMAS 



1) Existem diversas formas de PR IN- 
TAR algo na tela, e cada uma estS asso- 
ciada a um tipo de desempenho. De uma 
boa olhada na materia "Ok micro, voce 
venceu" (MS n9 21) que voce encontra- 
r3 diversas dicas sobre esse assunto. 

2) A tecla BREAK, em operagoes BA- 
SIC, 4 praticamente impossfvel de ser 
desativada e o melhor meio mesmo e as- 
sumi-la como tal. Ja em Assembler, a te- 
cla BREAK pode ser desativada facil- 
mente, bastando que o programa feito 
pelo usuSrio nao a considere como uma 
"interrupgao". 

3) No modo de edigao 6 impossfvel ha- 
ver uma mudanga do carSter do cursor, 
porbm em entrada de dados 6 possfvel 
escolher o que melhor Ihe convem. De 
uma lida na materia "Abrindo Espago 
na Tela" (MS n? 24) que trata especifi- 
camente desse assunto. 

4) Devido a operagao do SGM estar ajus- 
tada para valores hexadecimais. Nessa 
situagao, os valores decimais devem ser 
antecedidos pelo especificador "$". 

5) Basta acrescentar ao enderego inicial 
da linha, os 2 bytes do numero de li- 
nha, 2 bytes da quantidade de elemen- 
tos da linha e o byte do cbdigo da ins- 
trugao. Assim, se uma linha REM co- 
mega no enderego 16509, o seu pri- 
meiro elemento disponfvel sera 16509+ 
2+2+1 = 16514. Para achar o enderego 
inicial da linha, basta fazer uma procura 
pela linha desejada na 3rea de memdria 
onde reside o programa BASIC. De uma 
estudada na dica "Zerando REMs" (MS 
n?27). 



PERGUNTA 



Os enderegos 16404 e 16405 nos micros 
da linha Sinclair armazenam o ultimo 
enderego utiUzado pelo programa da 
memdria. Porem, ao ligar o micro, usan- 
do-se o comando PRINT PEEK 16404 + 
256*16405-16509, obtemos como re- 
su/tado 794 (sem programas ou variaveis 
na memdria). Sabendo-se que as varia- 
veis do si sterna nao ocupam nem 150 
bytes de memdria, como posso separar 
programas de 1 ,2 ou 1 6 K? 

C/Judio C. Araujo — Salvador — BA 



MICRO SISTEMAS 



Realmente o comando PRINT PEE n 
16404+256 *PEEK 16405- 16509 d<§ a 
quantidade de bytes de um programa 
em BASIC, incluindo as variSveis e o 



arquivo de imagem. Porem, se oequipa- 
mento tiver 1 ou 2K o resultado nao 
ser£ 796, e sim 26. Tal fato ocorre por- 
que em micros com menos de 3,5K de 
RAM o arquivo de imagem fica com for- 
mato reduzido. Veja a materia "Peque- 
nas Memorias, Grandes Economias", MS 
n? 22. 



PERGUNTA 



Quando se estd operando em Assembly , 
h£ algum con tat o com o sistema opera - 
cional, ou o microprocessador sd se con- 
centra no programa em questfo? O que 
me levou a I e van tar a seguinte questio 
foi o fato de que certas variaveis do sis- 
tema (como o contador de tempo) ou 
certo parametro de tela (16424) estarem 
sen do frequentemente atualizados. O 
microprocessador tern capacidade para 
fazer isso sozinho, ou necessita de roti- 
nas para tal? Existe algum FLAG que 
indica ao processador em que modo 
operar? Ele constroi a imagem sozinho, 
ou recorre ao sistema operacional para 
gerar a tela em SLOW? 

Clifford M. Oliveira — Curitiba — PR 



MICRO SISTEMAS 



0 Z80 e um microorocessador que tern 
a capacidade de gerar interrupgoes (IN- 
TERRUPTS), ou seja, de tempos em 
tempos o microprocessador interrompe 
a execugao de um programa e passa a 
executar uma outra rotina e logo apos 
ele retorna ao programa -original. Essas 
interrupgoes podem ser de dois tipos: 
MASCARAVEIS e NAO MASCARA- 
VEIS. A interrupgao MASCARAVEL 
pode ser ativada e desativada pelo usuS- 
rio, dependendo dos seus objetivos. 0 
Sinclair usa a interrupgao mascar£vel 
para manter o vfdeo quando ele opera 
em SLOW. As NAO MASCARAVEIS, 
como o nome indica, independem da 
vontade do usuSrio e nao h3 como evi- 
tar a sua ocorrencia. 0 Sinclair usa esse 
tipo de interrupgao para criar um dis- 
play na tela da TV. 0 enderego 16443 
possui um FLAG que indica o estado 
FAST/SLOW que e o bit 6 (o bit 7 e 
apenas uma cbpia desse estado). 

Uma vez que, a cada quadro enviado 
ao vfdeo, a vari^vel nos enderegos 16436 
e 16437 e incrementada, procede a ob- 
servagao quanto 3s variagoes em deter- 
minados enderegos. Podem ser feitas 
algumas observagoes: o enderego 16424 
e usado apenas para ajuste de diferentes 
padroes de TVs (norte-americano, in- 
gles, etc.); a interrupgao MASCARA- 
VEL gera um CALL ao enderego 38H e 
a NAO MASCARAVEL ao enderego 
66H. 



Envie suas perguntas para MICRO SISTEMAS /SEQAO MS RESPONDE : Av. Presidente Wilson, 165/grupo 1 .210, Centro. 
CEP 20030, Rio de Janeiro, RJ. 
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Conhega neste artigo uma maneira pratica 
c simples de esconder e diminuir seus programas 
cm BASIC no TRS-80 Color 



Camuflando 

Programas 

Celso Bressan 



V amos apresentar uma tecnica simples mas eficiente 
para dissimular seus programas em BASIC no TRS- 
80 Color Computer e nos seus similares nacionais 
como o CP-400, Codimex, Color-64 e outros. Com 
ela poderemos eliminar os comandos DATA, reduzir a necessi- 
dade de memoria e esconder uma parte do programa dentro 
dele mesmo, tornando-o mais seguro. Poderemos tambem re- 
solver definitivamente o problema da aloca^ao de sub-rotinas 
em Assembler que ficarffo embutidas, quase invisi'veis. E, de- 
pendendo da imagma 9 do de cada um, outras possibilidades po- 
derdto ser realizadas. 

Para testar esta tecnica apresentaremos tambem um progra- 
ma que Simula o jogo do Genius. 

O BASIC 

Um programa em BASIC, para ficar devidamente armazena- 
do na memoria, depende essencialmente de dois ponteiros ou 
endere 90 S que existem na drea do sistema do nosso micro. Sao 
eles os endere^os de imcio e de fim dos programas, que se lo- 
calizam nos bytes 25-26 e 27-28 em decimal, respectivamente. 
Vejamos, entao, como as coisas se passam com este pequeno 
programa: 

10 READ A,B 
20 PRINT A,B 
30 END 
40 DATA 13,5 

Ele atribui valores ds varidveis A e B, imprime 13 e 5 e pdra. Na 
memoria, ele d armazenado de acordo com a figura 1 . 

Vamos a alguns esclarecimentos. No desenho, as linhas es- 
tdo quebradas, mas na memdria elas ficam umas apos as outras. 
Cada linha se inicia com um endere 90 binario, de dois bytes, 
que aponta para a proxima linha. Mas, na verdade, apos a ulti- 
ma, existe mais uma, com um endere^o igual a zero, informan- 
do ao BASIC o fim real ou fisico do programa. A seguir, em 
todas as linhas, vem outros dois bytes bindrios que represen- 
tam o numero da linha. N5o importa o tamanho do numero: 
este d sempre armazenado nestes dois bytes. Logo apos, vem a 
linha propriamente dita, que geralmente come 9 a com um co- 
mando BASIC, representado pelo seu mnemonico (na figura 
1 , sao os dois digitos hexadecimais entre parenteses abaixo 




do comando), seguindo-se o resto da linha, existindo sempre, 
ao final, um byte em zero bindrio (na figura, um asterisco). 
Numa inspe 9 §o mais acurada encontraremos tambem algumas 
casas em branco, significando espa 9 os, que servem para dar 
maior clareza ao programa. Alguns programadores usam a tec- 
nica de elimind-los, diminuindo o programa e aumentando a 
velocidade de execu 9 do, d custa da mesma clareza. 

0 TRUQUE 

O segredo do que vamos fazer agora e baseado em que, como 
foi dito hd pouco, embora o programa termine no END, o fim 
real e indicado pelo endere 90 em zero binario da ultima linha, 
no caso, aquela que vem depois do END, e nao pelo proprio 
END ou pelo endere 90 de fim de programa dos bytes 27-28. 
Em outras palavras, o programa pararia de qualquer maneira 
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Na compra de 
Cr$ 1.000.000 
voce ganha um 
aparelho que duplica a 
utilizagao do diskete 



COMPUTADORES 

• Suprimentos 

• Perifericos 

• Impressoras 

• Drives 

• Placas de Expansao Interfaces 

• Cabos 



res 



Mesas para terminais 
de video 

c, *539.850 



• FabricagSo prdpria 

• Cores discretas 

• Desenho moderno 

• 5 modelos 



Conosco voce encontra tambem, tudo o mais que 

precisa em video-game, som, telefonia, 

das melhores marcas e procedencias, e mais: 

VIDEOS 

• Transcodificagao todos os sistemas 

• Fitas: VHS - BETA-U-MATIC e para limpeza de cabega 

• Baterias p/2 e 8 hs. 

• lluminadores 

• Cabos de extensao p/ cameras 

• Bolsas p/cameras e videos 

• Telao 



• Acessdrios nacionais e importados 

• Suporte p / TV teto ou parede 

BTC” 2001 



• Curso de ingles em video-cassete 

• Servigo expresso remetemos para todo Brasil 



.ALTA TECNOLOGIA 



BRASILTRADE CENTER 

Av. Epiteicio Pessoa, 280 (Esq. de Visconde de Pirajd), Ipanema - Rio de Janeiro - CEP 22471 - 259-1299 

Rua da Assembl6ia, 10 - Loja 1 12 (Ed. C&ndido Mendes) Rio de Janeiro - (021) 222-5343 

Av. das Am6ricas, 4790 - Sala 615 (Centro Profissional Barra Shopping) Rio de Janeiro - 325-0481 

TELEX (021)30212 BTCP 

Fdbrica: Rua Silva Vale, 416 - Cavalcanti - RJ - Tel.: (021) 592-3047 




CAMUFLANDO PROGRAMAS 



quando fosse encontrado o zero, explicando, assim, porque um 
programa ndo precisa ter necessariamente um END. 

Para que serve, entdo, o endere^o de fim do programa? Ele 
tern dupla utilidade: indica o BASIC o inicio da drea onde po- 
derdo ser colocadas as variaveis do programa durante a execu- 
9 do e, ao mesmo tempo, o fim da drea correspondente de pro- 
grama que deve ser salva em cassete ou disquete. 

O truque esta, portanto, em se deslocar este endere 90 um 
pouco mais para cima da mem6ria, colocando-se neste espa 9 o 
o que se quiser, e o BASIC nem tomara conhecimento. Com 
efeito, poderemos entdo editar, inserir ou apagar linhas; salvar 
ou carregar o programa que esta drea sempre existira e perma- 
necera intacta em seu conteudo. So existem tres formas de 
atingi-la: via PEEK e POKE ou atraves do comando NEW, que 
apaga todo o programa. 

A respeito do que foi dito no inicio, vamos observar nova- 
mente a figura 1. Vemos que o DATA, apesar de conter so- 
mente duas infom^Oes, gastou, na realidade, 1 1 bytes (e este 
e uma DATA muito simples!). Se usassemos PEEK’S e POKE’S 
gastarfamos apenas dois bytes! 0 que representa muita econo- 
mia de memoria, quando forem vdrios DATA, e tambem de 
tempo de execu 9 ao. 

A TfiCNICA 

Facil e simples! Basta eliminar os DATA, substituindo-os 
por bytes na area criada acima do BASIC. Esta tecnica exige, 
porem, um bom planejamento prdvio desta drea, pois qualquer 
erro de endere 9 amento poderd inutilizar nosso programa. 

Fa 9 amos/entdo, um ma- 
pa da drea, verificando 
quantos bytes serdo ne- 
cessarios, em que ende- 
re 90 S relativos d zero 
eles estardo colocados 
e que tipo de informa- 
9 do conterdo. No nos- 
so programa exemplo, 
o Genius, precisare- 
mos de 60 bytes, dis- 
tribuidos conforme a fi- 
gura 2. 0 byte zero es- 
tard reservado para um 
indice que sera o nume- 
ro da figura a ser mostrada no video (a descri 9 do mais detalha- 
da do programa sera feita mais adiante); os bytes de 1 ate 48 
serdo usados para conter uma sub-rotina em Assembler que 
mostrard a figura no vi'deo; e os bytes de 49 ate 60 conterdo 
um array numericoque informara a sub-rotina ascoordenadas X 
e V e a cor de cada uma das quatro figuras a serem mostradas. 

Feito isto, a etapa seguinte consiste na aloca 9 ao propria- 
mente dita da area, atravds dos seguintes comandos da listagem 
1, em modo direto, sem RUN: o primeiro comando obtem o 
endere 9 o atual do fim do programa e o coloca em FP (mesmo 
que nao haja programa). A seguir, somamos o numero de bytes 
que necessitamos, em FP, calculamos e imprimimos as partes 
mais e menos significativas deste novo endere 90 . Por ultimo, 
colocamos de volta os valores de A e B, atraves de POKE, nos 
bytes 27 e 28. A drea esta alocada. Como ja dissemos antes, a 
partir deste ponto, esta area estara sempre colada ao programa, 
como uma sombra, com seu conteudo intacto. 

Vamos agora colocar algo nela, como nosso pr6ximo passo. 
Digite o programa da listagem 2, e vamos ver o que cada linha 
significa. A linha 10 calcula o inicio da drea, que e o endere 90 
de fim do programa menos o tamanho da area (60 bytes). A ii- 
nha 20 atribui a USR1 o seu endere 9 o de infcio, que corres- 
ponde ao byte 1, relativo d zero, da drea. O mesmo acontece 
com o array numerico, na linha 30, come 9 ando no byte 48. 
As linhas 40 ate 140 colocam a sub-rotina no seu lugar, jd pre- 
viamente marcada, e as linhas 150 ate 190 fazem o mesmo, 



com o array. 

De RUN. A drea estard inicializada como n6s queriamos. 
Embora possamos estar absolutamente certos de que tudo 
correu bem, ndo conv£m, ainda, apagar as linhas de 40 ate 160. 
Vamos deixar isto para quando todo o programa estiver fun- 
cionando. Mas, evitaremos novas reinicializa9<3es a cada vez 
que dermos RUN, colocando o comando 45 GOTO 200. 

Finalmente, a ultima etapa, que e a do programa comple- 
to. Digite a listagem 3 e teste. Se tudo estiver bem, voce ja 
poderd apagar aquelas linhas do inicio que agora sdo inuteis 
(ndo se esque 9 a de que as linhas 10 ate 30 ndo podem ser apa- 
gadas). De o RENUM e salve. O programa nao esta mais lim- 
po, menor e mais protegido? Quanto a rapidez, esta ndo serd 
sentida neste programa pois ele e pequeno, mas existird. 

O PROGRAMA 

Estd 6 um programa simples, que Simula o jogo do Genius. 
No video aparecerdo, em ordem aleatoria, figuras em quatro 
cores que deverao ser repetidas na mesma ordem pelo jogador. 
Estas figuras sdo: em cima, na cor azul, correspondendo a te- 
cla “I”; a esquerda, vermelha, tecla “J”; d direita, branca, te- 
cla “K” e, embaixo, verde, tecla 4 ‘M”. 

O jogo se inicia com uma figura. O jogador responde com 
a tecla adequada. A seguir, aparecerdo duas figuras, ds quais 
o jogador deve responder teclando na ordem correta e assim 
por diante ate eventualmente errar. Entdo, serdo mostrados 
os pontos obtidos ate ali. Sons adequados se fardo ouvir em 
cada momento. 

Algumas explica9<3es para aqueles que quiserem entender 
ou modificar o programa: 



Listagem 1 

FF-PEEK ( 27 ) *256+PEEK ( 2S ) 

FF-FP+60 

R=INT ( FP/256 ) 

B=FP-R*256 
PRINT fl,B 

POKE 27, valor de fi 
POKE 2S, valor de B 



Listagem 2 



10 FP=PEEK<27)*256+PEEK<28>-60 
20 DEFUSR1=FP>1 
30 RN=FP+48 
^0 K=FP 

50 FOR 1=1 TO 5 
60 RERD R* 

70 FOR J=1 TO LEN(R$) STEP 2 

80 K=K+1 s POKE K,VRL( H &H"+MID$(R$,J,2) ) 

90 NEXT J,I 

100 DRTR 1F51R61D33RC284RC6033D 
110 DRTR 33C5E6A186203D8B0^1F01 
120 DRTR E6CA3RR6A21F891F03S605 
130 DRTR C605EF815R2EFB308816^R 
140 DRTR 2EF339 
150 FOR I=RN TO RN+11 
160 RERD J SPOKE I,J 
170 NEXT I 

180 DRTR 10,0,175,0,5,255 
190 DRTR 19,5,207,10,10,223 
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Finalmente, a sub-rotina em Assembler e referenciada nas 
linhas 340 e 440 e usa o numero da figura K, colocada pelas 
linhas 330 e 430. 

Naturalmente, esta tecnica permite um numero infinito 
de variantes que cabera ao leitor inventar e usar. Variaveis 



Na linha 220, a variavel DE indica o tempo de espera entre 
uma figura e outra (para os mais lentos, basta aumentar este 
valor). A cada sequencia de figuras, este tempo vai diminuin- 
do. 

O la 90 principal do programa, ,que permite ate 50 sequen- 
ces, esta contido da linha 230 ate a 520, sendo que as linhas 
240 ate 380 e 390 ate 490 mostram e pedem a sequencia, res- 
pectivamente. 



na area (alias, indiretamente, isto foi feito com a sub-rotina). 
Do mesmo modo, a ordem de execu^ao das etapas de 
elabora^So do programa pode ser modificada, ressalvando- 
se, entretanto, a primeira. No caso da modifica^ao de um 
programa que jd existe, a aloca^o da drea sera a ultima coi- 
sa a se fazer. Como regra geral, lembre-se: antes de qualquer 
RUN, salve o programa como ele estiver, ja que qualquer 
erro poderd ser recuperado com uma recarga do programa. 

Uma outra possibilidade fascinante sdo os programas que 
aprendem, isto £, basta modificar a area a cada execu^do e 
salvar ao final. Um ultimo lembrete: nenhum programa, 
embora pronto, e considerado imutdvel, principahnente 
os longos. Portanto, tenha sempre duas copias do progra- 
ma, uma completa, que permitira modifica^Oes, e outra 
reduzida, para uso do dia-a-dia. 

Cel so Bressan 6 formado em Engenharia Eletronica e pds-graduado em 
Sistemas de Informal So pela UFRGS. Trabalha em processamento de 
dados desde 1969 e atualmente 6 Analista de Sistemas na FundaqSo Me - 
tropolitana de Plane/amen to, em Porto Alegre. 






My 



m. 



M^^Woduz a voz hu- , 

mana perfeitamente. \ J 

Permite que se varie a to* \****^ y 

/ nalidade, volume e velocida- N. ^ 
y de da voz. Basta digitar a pala- 

' vra ® ouvir com a pronuncia correta em ingl&s ou portu* 
guds. Facflima operacSo Ja vem com alto-falante na inter- 



Aplicacfies: 

- Aprendizado do ingl&s; 

- Torna seus programas aplicati- 
vos educativos e jog os falados. 

- Acompanha disco c/software de 
demonstrap&o e manual detalha- 
do. 

Garantia de 90 dias. 

Opcional: 

Mini-dicion£rio c/3.000 palavras 

no soft, para consultas r£pidas em 

portugu&s/inglfts ou vice-versa. 



* Desejo recaber: 

I □ INTERFACE PALM. DISCO 

E MANUAL POR Cr$ 385000 
, □ TAMBfcM MINI-DICIONARIO 

POR Cr$ 34000 
, □ MAIS INFORMACOES. 

NOME: 

END.: 

I CEP: CID. : EST • 

| ENVIE CHEQUE NOMINAL A 
| PALM SOFT LTD A. 

, R. AUG USTOSTELL FELD, 1314 
, CEP 80000- CURITIBA - PR 
I .^lE: (041)2245946 

Cr$ ^ ^ ■_ 



Listagem 3 



200 DIM SE ( 50 > 

210 P=0 
220 DE=150 
230 FOR 1=1 TO 50 
240 CLS 

250 PRINT6266 i "G E N I U S" 

260 FOR J=1 TO 200: NEXT J 
270 CLS0 

280 FOR J=1 TO 130:NEXT J 
290 FOR J=1 TO I 
300 K=RND( 4 ) 

310 SE ( J ) =K 

320 FOR L=1 TO DE:NEXT L 
330 POKE FP ,K 
340 L=USR1 ( 0 ) 

350 SOUND K*40,l 

360 FOR L=1 TO 50: NEXT L 

370 CLSO 

380 NEXT J 

390 FOR J=1 TO I 

400 R*=INKEY*:IF R*= ,,M THEN 400 

410 K=- ( R$=" I " > -2* ( P$=" J" )-3* ( R*="K" ) -4* ( R4="M M ) 
420 IF K=0 THEN SOUND 200,1: GOTO 400 
430 POKE FP,K 
440 L=USR1 ( 0 ) 

450 IF SE ( J ) < >K THEN 540 

460 P=P+1 

470 SOUND K*40 , 1 

480 CLSO 

490 NEXT J 

500 DE=DE-5 

510 IF DE< 20 THEN DE=20 
520 NEXT I 
530 GOTO 230 
540 PLRY "L 15RBCDEFG " 

550 CLS 

560 PRINT 6106,"G E N I U S" 

570 PRINT 6203, "P0NT0S=" JP 
580 PRINT 6498, "TECLE RLGO" 

590 IF INKEY$=" " THEN 590 ELSE 210 



5-/emicro 

Seminario de Microcomputadores 
Rio de Janeiro 12 a 16 de Agosto 



NUCLEO DE COMPUTAQAO ELETRONICA 

Universidade Federal do Rio de Janeiro 

OBJETIVOS 

Difundir o microcomputador como ferramenta de uso cotidiano e profissional e 
mcentivar o desenvolvimento de software aplicativo e a sua comercializapao. 

temas 

AplicapOes de microcomputadores. Desenvolvimento de software aplicativo; 
Comerciahzacdo de software; 0 micro na educagdo, Tenddncias de arquitetura 
de micros e de redes locais, MicroeletrOmca. Tecnologia Nacional de 
Informatica. 

EVENTO ESPECIAL 

4* MicroexposigSo de Fabricantes Nacionais de Micros, Perifericos 
Software e Suprimentos 

EVENTOS PARALELOS 

II SACI - Semin4rio de AplicapOes Cientfficas em Informatica - 
14 a 16 de agosto 

III SEMAP - Seminario de Microinformatica na Admimstracao 
Publica - 14 e 15 de agosto 



INFORMACOES Nucleo de Computapao EletrOnica 

Caixa Postal 2324 - CEP 20001 - RJ 

Tels: 290-3212 ramal 248 e 270-2438 
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Veja ncsta parte do artigo como calcular os lucros 
de sua empresa nos proximos anos, utilizando a analise 
de correlagao, regressao e projegoes lineares 



Estat/stica Ap/icada III 

Raul Udo Christmann 



CORRELAgAO, REGRESSAO 
E PROJE^OES LINEARES 



A empresa K. I. Tudo Ltda. apresen- 
tou, nos ultimos cinco anos, o seguinte 
desempenho em bilhOes de cruzeiros: 



Ano 


1980 


1981 


1982 


1983 


1984 


Lucro 

Uiquido 


-0,8 


-0,3 


2,0 


1,8 


2,5 



Considerando que a situa9ffo dos 
tiltimos anos permane^a por mais dois 
anos, qual seria o lucro h'quido espera- 
do para 1985 e 1986 ? Esta quests foi 
proposta ao Jo£o, nosso esfo^ado ana- 
lista, pelo Sr. Barbosa. Pela solu9ao do 
problema, ele ganharia uma gratifica9ao 
de CrS 50 mil e, se acertasse, poderia 
atd ser promovido. 

A TEORIA 

Um problema freqiiente 6 o da deter- 
mina9ao do valor de uma grandeza par- 
tindo do conhecimento do valor de uma 
outra, ou porque esta ultima 6 de deter- 
mina9^o mais fdcil ou porque antecede 
no tempo. Outra situa9ao 6 a necessida- 
de de se verificar se existe correla9ao en- 
tre as duas varidveis e, caso isto ocorra, 
projetar valores num tempo futuro. 

A medida da pressao de um gas com 
base na sua temperatura; a resistSncia do 
390 com base no seu acabamento super- 
ficial; o atraso nas entregas com o mes 
de dezembro; o desempenho financeiro 
com a polftica salarial vigente s£o exem- 
plos onde a Andlise de Correlate e Pro- 
gress^ 6 bastante util. 



AJUSTAMENTO LINEAR 
(METODO DOS MINIMOS QUADRADOS) 

Considerando n pares de valores para 
as varidveis X e Y, o procedimento ini- 
cial 16 gico 6 colocar estes valores num 
diagrama ortogonal como o da figura 1. 

Para evitar um crit^rio discut ivel para 
o ajustamento linear a esses pontos, tor- 
na-se necessario a defines*) da “melhor 
reta de ajustamento”. Considerando que 
a equa9So y = a + bx represente esta re- 
ta, os valores de a e b podem ser estima- 
dos pelo m£todo dos minimos quadra- 
dos. Veja na figura 2 que a corresponde 
ao ponto de interse9So da reta com o 
eixo y,e b 6 um coeficiente que indica 
o angulo de inclina9ao da reta. Este m£- 
todo garante que a soma das distancias 
verticals entre os pontos observados e os 
estimados, elevadas ao quadrado, seja a 
minima poss ivel. 



y 

■j _ 


Lucro 

Liquido 




2- 
i _ 










< 


Ano 










> 


1 

n _ 












u — 
-1- 


8 

1 


0 i 

1 


► 8 


2 8 


3 8 


4 x 



Figura 1 



Esta minimiza9ao 6 obtida pela deri- 
va9£o parcial (mdtodo matemitico) da 
soma das distancias em rela9ao aos para- 
metros a e b. 

Sendo X a variavel independente e Y 
a vari$vel dependente, a deriva9So resul- 
ta em que 





n 






n 




Z Y, 
i = l 1 


= n a 


+ b 


i=i x i 


n 




n 




n 2 


Z 

i = l 


X i Y i = 


a Z 
i = l 


X. + 

l 


b Z X. 
i = l 1 


ou 


n 








b 


Z 

i=l 


X. Y. 
l l 


- n 


X Y 



n 2 -2 
T X z - n X 

i = l 1 



a = Y - b X 
onde 
n 

2 Yj = soma dos valores da variavel 
. _ j Y (soma das prqje9<5es dos 

pontos sobre o eixo Y); 

n 

2 X- Y- =somadosprodutosde XeY; 
i = 1 
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2 X? = soma dos valores de X, ele- 



X = m^dia aritmdtica de X (j J j ^/n); 
Y = mddia aritm^tica de Y; 
n = numero de pares de valores. 

MEDIDA DE DEPENDfiNCIA 

Teoricamente £ possfvel o estabeleci- 
mento de uma reta de regressao entre 
duas varidveis quaisquer. Pode-se, por 
exemplo, relacionar os pontos obtidos 
pelos alunos no vestibular com suas es- 
taturas. S6 que, neste caso, a regressSo 
obtida nao terd qualquer valor prdtico. 

Uma medida do grau de dependen- 
ce entre as varidveis X e Y pode ser 
obtida pelo “coeficiente de correla 9 ao 
amostral”: 



2 -2 
I XT - n X z 



v v -2 

Ji 1 - n y 



Figura 2 



de quantos por cento a varia 9 ao explica- 
da pel a regressao representa da varia 9 ao 
total. 

Ambos os coeficientes variam de —1 
a 1 , onde o sinal (+ ou -) indica o senti- 
do da dependencia, e o modulo o grau 
de dependencia. Quanto mais prdximo 
da unidade, maior a dependencia. A fi- 
gura 3 ilustra algumas situa9<5es. 

Genericamente pode-se dizer que: 

Irl < 0,7 = dependencia insigni- 
ficante 

0,7 < I r I < 0,9 = dependencia signifl- 
cante 

Irl >0,9 = dependencia forte 

TamWm £ possivel a realiza 9 ao de 
um teste de significance para r, atraves 
do calculo de 



0 coeficiente de correla 9 ao r, intro- 
duzido por Karl Pearson, mede a quanti- 
dade de dispersao dos pontos em tomo 
da equa 9 £o. Outra medida de dependen- 
cia e o “coeficiente de determina 9 ao” 
r 2 . Ele £ interpretado como indicador 



\T^2 



que segue uma distribu^ao de Student 
com n-2 graus de liberdade. 0 coefi- 
ciente de correla 9 ao £ significativo num 
grau de confiabilidade 1 - a, se t > H, 



RTENCRO: 

EMPRESAS 
SOFTWARE-HOUSES 
CENTROS DE INFORMACAO 

MHO LEIRM ESTE IINIJNCIO SE 
QUI3EREM CONTINURR RTRRS 

ADDRESS * 

VIDEO 

COMPUTER 

CONNECTION 

Emcno EM VIOEOCHSSETE 
-+CURSOS E TREINRMENTUS 
-+PRLESTRRS ILUSTRRDRS 
-►VT"i> INSTITIJCIONRIS 
MEMENTOS 

EDICRO COMPUTADORIZADA 
COM OS MAIS MODERNQS 
RECURSOS DE ANIMAQAO 
DIGITAL. 

IDEAL PARA TREINAMENTOS 
CONSTANTES EM EMPRESAS 
OU CURSOS A DISTANCIA. 

METODO VtDEOTEACH # * 

R D DRESS* 

Video Computer Connection 
CENTRAL DE INFORMAQOES 
Oil 211 -5348 * Oil 212-0370 



Estt* anonao saiu mv®n«Jo A pedtdo do 



S800 *82 ULO) ”WL 
ZOCLO J «P“B ,01 Z 0 *l o ? 8 Jd »na 

NVld03X3 

S3iNVlN3S3Md3H VUVd S01U38V SOiVINOD 
£SS9 393 a UtS 033 U30) "SHU 
ra 20LL 16 o'u osojjea *o*ui|v *V 
van viuonnsNOD 3 3 hvmjuos Od 



svaino svunw 3 
vi/midv svisodS3a sv svqoi^ 

a30N3HdV 30 HOVdQ 

Sinoniaod W3 biajihcJiaii 3 3A3«ds3Q] 

Dd~l/MQI VHNI1 V WOO 33A|lVdWOO Q 

: 3HO VIAIVHDOHd lAlfl Oav 











ESTATISTICA APLICADA III 



sendo H = ; n - 2 obtido de uma ta- 

2 

bela de Student, encontrada em livros 
de estatistica. A figura 4 mostra uma ta- 
bela partial de Student. 

Agora, que vimos a teoria, vamos 
dar uma m&o ao Joao. Para isso, fare- 
mos: 



X=ano 


1 1 1 


2 


3 


4 


5 


Y=lucro 


00 

o 

1 


-0,3 


2 


1*8 


2,5 



onde 




ZX, = 15 


£X? = 55 


2Y i = 5,2 


IY? - 14,22 


IX i Y i = 24,3 


X = 3 


Y = 1,04 


n = 5 



assim: 

b = 24 r 3 - ( 5 ) ( 3 ) ( 1 f 04 ) = Q f8? 

55 - ( 5 ) ( 3 ) ( 3 ) 



Numeros de 
pares de 
valores 
n 


Grau de 


confiabilidade 

l-o 


90% 


95% 


99% 


5 


2,353 


3,182 


5,841 


10 


1,860 


2,306 


3,355 


15 


1,771 


2,160 


3,012 


20 


1,734 


2,101 


2,878 


25 


1,714 


2,069 


2,807 


30 


1,703 


2,052 


2,771 


m 


1,645 


1,960 


2,576 



Figura 4 - Valores de H 

tiva por ponto”. Sempre que possfvel, 
deve ser estabelecida uma u estimativa‘por 
intervalo”. Esta estabelece um intervalo 
dentro do qual a varidvel X ocorrerd 
com 95% ou 99% de confiabilidade. 

A fbrmula para o cilculo dos limites 
inferior e superior 6 bastante complexa 
e, por isto, omitida neste artigo. Para 
obte-la, consulte os livros de estatistica. 

Para o problema abordado, o interva- 
lo para um indice de confiabilidade de 
95% ser A: 



a = 1,04 - ( 0 , 87 ) ( 3 ) = -1,57 

resultando na equa 9 ffo linear 

Y = —1,57 + 0,87X. 



O grau de dependencia entre a varid- 
vel X e Y A de: 



».07 yji 



55 - ( 5) ( 3) ( 3) 



14,22 - ( 5 J C 1 , 04 ) ( 1 , 04 ) 



r 2 - (0,9268) 2 - 0,8589 

Realizando o teste de significance: 



0,9268 

Vl - ( 0 , 9268 ) 2 



\/ 5 - 2 ^ - 4,2744 



Da tabela da figura 4, verificamos 
que H = 3,182 para um nivel de confia- 
bilidade de 95%, satisfazendo, assim, a 
cond^ffo de t > H (o mesmo )A nSo 
acontece para 99%). Deste modo, Jo£o 
pode afirmar com 95% de confiabilidade 
que a dependencia 6 significante. 



PROJECTS LEMEARES 

Conhecendo-se a equa 9 <fo de mini- 
mo quadrado e sabendo-se que a depen- 
dencia A significativa, 6 possfvel a esti- 
mativa do lucro liquido para os pr6xi- 
mos anos. Assim, A suficiente fazer: 

Y = -1,57 + (0,87)(6) = 3,65 

Y = -1,57 + (0,87)(7) = 4,52 

Isto significa que a K. I. Tudo Ltda. 
pode esperar um lucro liquido de apro- 
ximadamente CrS 3,65 bilhSes para 
1985 (ano 6) e de CrS 4,52 bilhOes 
para 1986 (ano 7). 

Esta estimativa A chamada “estima- 



1,858 < [ luCro l£< * uid °l < 5,442 

1985 



lucro liquido 6 Q12 

1986 J 



Jo2o ter A uma possibilidade maxima 
de 5 em 100 (95%) de ser promovido, se 
disser ao chefe que seu lucro lfquido em 
1985 deverd estar entre 1,858 e 5,442 
bilh5es de cruzeiros. 

O PROGRAMA 

Com base num conjunto de pares de 
valores para X e Y, o programa da lista- 
gem 1 (que deve ser agregadoaos ant erio- 
res) determina: 

• a reta de regressao linear de X 
sobre Y 

• a reta de regressao linear de Y 
sobre X 



X = ANO 


Y = CRS 


X(l)=l 


Y ( 1 ) =-0 . 8 


X( 2 ) = 2 


Y( 2 ) = 0.3 


Xl3)=-999 




DIGITE O PAR < X > , 


< Y > ERR ADO 


2 


0.3 


X( 2 ) =2 


Y ( 2 ) =-0 . 3 


X( 3 ) = 3 


Y ( 3 ) =2 


X ( 4 ) =4 


Y ( 4 ) -1 . 8 


X( 5 ) -5 


Y( 5 ) s 2 . 5 


X ( 6 ) =999 





Figura 5 



• o coeficiente de correla^do linear 

• o coeficiente de determina^do 

• a mddia aritmdtica e o desvio-pa- 
drdo dos valores de X 

• a mddia aritmdtica e o desvio-pa- 
drdo dos valores de Y 

• o valor de t 

• a estimativa por ponto e por inter- 
valo para a variavel X ou Y 

• a representa^So grdfica de regres- 
sSo linear 

O programa deve ser rodado em tres 
etapas: 

1? etapa: determinate da reta de re- 
gressao — (corresponde ao trecho do 
programa entre as linhas 1500 e 1818) 
Quando da presen 9 a do menu initial, di- 
gitar o cddigo 3 (o menu foi apresenta- 
do em MS n? 44). Ap6s indicar o nome 



ANO 


: MEDIA 


t 3 




: VARlANCIA 


: 2.5 




: DBS. PADRAO 


: 1.5811388 


CRS 


: MEDIA 


s 1.84 




: VARlANCIA 


: 2.283 




: DES. PADRAO 


: 1.4842587 


COEF. 


CORRELAgAO 


: 8.92679143 


COEF. 


DETERM INAgAO 


: 8.85894235 


VALOR 


Z ( EST . VARlANCIA) 


. : 8.37557642 


VALOR 


T (3 GL) 


: 4.2748964 


REGRESSAO DE ANO 


SOBRE CRS 


A (INCLINAQAO) 


: 8.98729886 


B (INTBRSECCAO) 


s 1.9732183 


S (EST. VARlANCIA) 


: 0.59383846 


REGRESSAO DE CRS 


SOBRE ANO 


A < INCLINAQAO) 


: 0.87 


B ( INTBRSECCAO) 


: -1.57 


S (EST. VARlANCIA) 


: 0.55744955 



Figura 6 

das varidveis X e Y, os dados devem ser 
digitados aos pares (X* e Y t ; X 2 e 
Y 2 ...). O final da entrada de dados 6 in- 
formado pela digita 9 ^o do numero 999 
para a varidvel X. Na ocorrencia de um 
erro de digjta93'o, constatado ap6s se 
teclar NEWLINE, digi^ar — 999 para o 
pr6ximo X, repetir os valores de X e Y 
anteriores (um dos dois errados) e digi- 
tar os valores corretos. A figura 5 mos- 
tra a entrada de dados para o problema 
do Jo£o. 

Ap6s o processamento dos dados in- 
formados, o programa apresenta os re- 
sultados da figura 6. 

2? etapa: represen ta 9 §o grdfica da re- 
gressao — (corresponde ao trecho do 
programa entre as linhas 2500 e 2672) 
Ap6s retomar ao menu initial, 6 sufi- 
ciente digitar o c6digo 5. Esta etapa uti- 
liza os dados da anterior, nao havendo 
necessidade de nova entrada de dados. 

3? etapa: proje 9 des lineares - (corres- 
ponde ao trecho do programa entre as 
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Listagem 1 



i5oo if auu>i then ooto 150 * 
isos dim u<se> 

1503 DIM T ( 50) 

150* LET S*«PI-PI 

1505 LET SY.SX 

1506 LET 5SX.SX 

1507 LET SSy.SX 

1508 LET SSxy>S« 

1500 LET n.PIPI 

151* IF A ju > 1 THEN GOTO 1810 
1515 LET AJU.UAl 1" 

1522 PPINT INDIOUE 0 NOME DAS « J 
ARIAUEIS 

152* PRINT MAxlMO DE 6 lETRAS 

1525 PAUSE 180 

1526 SCROLL 

152? PRINT X » ”, 

1528 INPUT x* 

1529 PRINT X« 

1530 SCROLL 

1531 PRINT “V 

1532 INPUT Y» 

1533 PRINT Y* 

153* SCROLL 

1535 FOR I«VAL ”1" TO UAL "31” 
1836 PRINT 

1537 NEXT I 

1538 SCROLL 

1539 PRINT OIGITE OS UAlORES DE 

<X> E < Y > " 

15*0 SCROLL 

15*1 PRINT DIGITS 999, APOS 0 

ultimo ualor 

15*2 SCROLL 

15*3 FOR I*PIPI TO UAL 31 ” 

184* PRINT 
15*5 NEXT I 

1550 GOSUB 5000 

1551 IF AJu*10 then GO i 0 3026 

1555 SCROLL 

1556 PRINT X<”, N, ”) a ”, 

1557 INPUT x 

1558 IF a .-999 then GOTO 1600 

1559 PRINT x. 

1560 IF . >999 THEN GOTO 1650 

1561 PRINT ”Y •* N. ' a ' 

1562 INPUT Y 

1563 PRINT Y 
15-0 LET Sx«SX*X 

1571 LET SY«SY«y 

1572 LET SSx>SSx*x*x 

1573 LET SSY «SSy *Y*y 
15?* LET SSXY aSSXY + X«Y 

1575 LET U<Ni aX 

1576 LET T IN) *Y 
1580 LET NsN+PI/PI 
1590 GOTO 1555 

1600 SCROLL 

1601 PRINT "DIGITE 0 PAP X>,<V> 
ERR ACC' 

1602 INPUT X 

1603 INPUT Y 
160* lET SXaSX-X 

1605 LET 5V«5Y-Y 

1606 let SSxsSSx.x*x 

1607 LET SSY«55Y-Y*Y 

1608 LET SSxy aSSXY-X*"* 

1609 lET nsn-pi pi 

1610 SCROLL 

1611 PRINT X, 

1612 PRINT Y 

1613 GOTO 1555 

1650 FAST 

1651 CLS 

1660 LET En aN-1 

1661 LET NDF-N-UAL "3" 

1662 LET XM«SX^£n 

1663 LET YHaSY/EN 

166* let pnun.en*ssxy-sx««y 
1665 LET DSSx a£N »SS x -SX*SX 



LET DSSy .EN*SSY-SY*SY 
LET UxaDS5X/ (EN* lEN-l) ) 

LET UYaOSSY/ (EN* (EN-1) » 

LET SDX.SOR (UX) 

LET SDY.SOR IUY) 

let RaPNUM 50R ( 05SX *055Y ' 

LET RSO aR*R 

let TTaSOR ( (RSO*NDF) / (1-P5 

uET SEZafiOR il-RSO) 

LET SEXY aSOx *SEZ 
LET SEyx*5Dy*SEZ 
-ET AXaRNUMDSSY 
LET CXa iSSY*Sx-5Y*SSXY) /DSS 



1700 SLOU 

1701 PRINT AT 0 0 . X § . AT 0.6. M 

ED I A XM,AT 1.6. UARIANC 

IA ; UX , AT 2,6, DE.PADRAO 

SDx 

1702 PRINT AT 3.0.Y6.AT 36. M 

EDIA yM.AT * , 6 • “ UARIANC 

IA ; UY , AT 5.6. DE.PADRAO 

SD y 

1703 GOSUB 1800 

l'O* PAINT COEF.CORRELPCAO 
. R 

1705 PRINT ' COEF.DETERMINACAO H 
. RSO 

1~06 PRINT UAlOR Z lEST.UAR 1 
. SEZ 

1707 PRINT UALOR T ( ” , TAB 9 , NDF 
TAB 13.-GL) " , TT 

1-08 GOSUB 1800 

1-09 PRINT REGRES5A0 Dr ‘ , X§. TA 
B 20 SOBRE " y* 

1-10 PRINT 'A IINCLINACAO) 

. AX 

1711 PRINT B < INTEPSECCAOi 

, CX 

1712 PRINT S (EST.uARIANCIAi 
, SEXY 

1-13 GOSUB 1800 

1-1* PRINT REGRESSAO DE " , Y S. TA 
B 20 SOBRE ” . X* v 

1715 PRINT A (INCLINACAOJ 

, AY 

1716 PRINT B ' INTERSECCAO) 

. CY 

1717 print s (EST.UARIANCIAI 
. 5EYX 

1720 INPUT US 

1721 CLS 

1722 GOTO *3 

1600 FOR laUAL 0" TO UAl "31 
1801 PRINT 
1602 NEXT I 
1803 RETURN 

1810 FOP I.PI/PI TO NE 
1611 LET SX»SX*U(I) 

1812 LET Sr a5Y*T (I) 

1813 LET 5Sxa55X*U(Z) **2 
181* uET 55Ys5SY*TiI) **2 

1815 LET SSXY aSSXY *U ( Ii *T Cl) 

1816 NEXT I 

1817 LET NaNE*RI/PI 

1818 GOTO 1651 

2000 FOP laUAL 1" TO UAL "20" 

2001 PRINT AT 6 .7. "PROJECAO LINE 
AP AT 8. 13 E AT 10.*. INTERUA 
LOS DE CONFIANCA , AT 12,11. "OE 9 
5 PC" 

2002 NEXT I 

2003 CLS 

200* PRINT ' ESTIMAT1UA. DE <X> OU 



2005 INPUT ut 

2006 IF u*« X" THEN GOTO 2l30 
200? IF U$ a" Y ” THEN GOTO 2020 

2008 PRINT NAO ENTENDI... 

2009 PRINT DIGITE <X> OU <Y>" 

2010 GOTO 2005 

2020 PRINT "DIGITE OS UALORES 

2021 PRINT 8A3IC0S P . AS ESTIHAT 
IUAS . 

2022 PRINT DIGITS <999 > APOS 0 



2030 PRINT OS 

2031 LET I .UAL 0" 

2032 LET I»I*UAL "1" 

203* INPUT Ulli 

2035 PRINT util 

2036 IF Util <>999 TMEN GOTO 2032 
203? LET TANTOaI-1 

2036 CLS 

2100 LET T.UAL 1.96 *UAL 2 . 3?2 
* NDF*uAL 2.822- NDF/NDF 



5T. lIM.SUP. 

2107 PRINT Ot 

2110 LET UD-PI-PI 

2111 FOP IaPI/PI TO TANTO 

2115 LET jEaT*5Evx*S0P tl/EN*"H 
I) -XM) **2/ (SSX-EN*XM*XM) ) 

2120 LET UA »CY *AY *U ( I ) . 

2122 PRINT U ( I) . TAB 16. UA 

2123 PRINT TAB 8.UA-JE TAB 22 . UA 

♦ JE 

2125 PRINT Ot 

2126 lET UD-UD+1 

212? IF UD<6 THEN GOTO 2131 
2126 INPUT ut 

2129 LET UOaRl-PI 

2130 CLS 

2131 NEXT I 
21*0 GOTO 2200 
2150 GOSUB 2020 

2152 PRINT PARA Y. LlM.INF. X E 
5T. LIM.SUP. 

2153 PRINT Ot 

2160 FOP I sP I ,■ P I TO TANTO 

2161 LET JEaT*SEXY* ( 50R ill/EN*i 
U tl) -YMI * *2 I / ISSY-EN*YM*YM» ) I 
2165 LET UDaPI-PI 

2170 LET UA «CX *AX *U < I ) 

2175 PRINT Ulll.TAB 16. UA 
2 1?6 PRINT TAB 8 UA-JE , TAB 22, UA 

♦ JE 

2177 PRINT Ot 

2180 LET UDaUD*PI/PI 

2185 IF UD < UAL "6" TMEN GOTO 219 
0 

2186 INPUT Ut 

2187 LET ur-'-T-PI 

2188 FAST 
2169 CLS 
2190 SLOU 
2195 NE«T I 

2200 SCROLL 

2201 SCROLL 

8208 PRINT "NOUAS PRO JECOES 7 (S 
2203 INPUT US 

2205 IF us* 5" TMEN GOTO 2003 
2210 CLS 
2220 GOTO *3 

2500 FOP I«1 TO 20 

2501 PRINT AT *,3. "P E P P E S E 
N T A C A 0" , AT 6.9, "G P A F I 

C A AT 8.13, "0 A”. AT 10.7, "R E 
G P E S S A 0" 

2502 NEXT I 



2503 CLS 

250* IF AJU > 0 THEN GOTO 2509 

2505 PRINT AT 18,0 'NAO TENMO AS 
INFORMACOES”, AT 19.0. NECESSAR I 

AS P PROCESSAP AT 20.0. "ESTA TA 
REFfi. , AT 21 0 CONSUI TC 0 MANUA 
L - PAG. XXX 

2506 PAUSE 600 

2507 CLS 

2508 GOTO *3 

2509 lET Mix. UAL 1000000 

2510 lET MlYaHlX 

2511 LET MA.XaPI-Pl 

2512 LET HAYaMA. 

2513 FOR I ®P I , P I TO EN 

251* IF U ( I ) < MIX THEN LET Mlxaui 
I) 

2515 IF Ull) > MAX TMEN LET MA» ao i 
I) 

2518 IF TIH <MIY TMEN LET HlYaT. 
I) 

2617 IF T(I) 'MAY THEN lET MAY «T i 
I) 

2518 NEXT I 

2519 DIM 0 ( EN i 

2520 DIM C < EN i 

2530 FOR I.PI'PI TO EN 

2531 LET 0(1' a I NT I (Uin -MIXi < -M 
Ax-Mix » *5©' *5 

2532 LET C < I' ■ INT t (Til) -MIYi / (M 
A'. -MIY) *38 ■ *5 

2533 NEXT I 

25*0 FOP I a 3 TO 30 
25*1 PPINT AT 18.1. - 

25*2 NEXT I 

25*3 FOP 1=18 TO 1 STEP -1 
25** PRINT AT 13. * 

25*5 NEXT I 

25*6 PRINT AT 0 0 . Y S . AT 21.26. XS 
. AT 1 0 INT i MAY I. AT 10 0 . INT 
MAy *MIY) /2i . AT 18.0. INT MIN' AT 
20.2. INT i MI O AT 20 15 INT i.M 
AX*MIX ) /2i , AT 20.26. INT (.MAX 
25*7 LET us= 



25*6 PRINT AT * . 3 US AT 9.3. US A 
T i*.3,us 

25*9 FOR 1.2 TO 18 

2550 PRINT AT I .9 

2551 PRINT AT 1.16 

2552 PRINT AT I 23. 

2553 PRINT AT I.30 
255* NEXT I 

2560 FOR I . 1 TO EN 

2561 PLOT ocn .cm 

2562 NEXT I 

2570 GOTO A JU *50*2600 
2600 GOTO 2505 

2650 LET Sx.O 

2651 LET Sy.SX 
2658 LET SSX.5X 
8653 LET SSY.Sx 
265* lET SSxy .Sx 

2656 FOP 1=1 TO EN 

2657 LET Sx.SX*OlH 

2658 LET SSX«55X*0 (I> **2 

2659 LET Sy «SY*C m 

2660 lET S5VaSSY*C CD **2 

2661 lET SSXY *SSXY *C 1 1> *0 ( D 

2662 NEXT I 

2663 LET Ay. iEN*SSXY-SX*SYI / lEN* 
5Sx-3X*5X) 

2664 LET CY* lSSX*SY-SX*5SXY) / (EN 

♦ssx-sx*sx) 

2666 FOP X.O'li TO OlENf 

2668 IF (Cr*AY*XI . 0 THEN PLOT X 
INT (CY*AY*X) 

2669 NEXT x 
26-»0 INPUT US 

2671 CLS 

2672 GOTO *3 



Correlagdo, Regressdo e Projegoes Line ares 



linhas 2000 e 2200) Ap6s retomar ao desejada. Digitar 999 ap6s o tiltimo va- 

menu inicial, esta etapa se inicia depois ior da varidvel independente. A figura 7 

da imposta$2o do cddigo 4. Ap6s indi- ilustra a entrada de dados e o resultado 
car qual a vandvel a ser estimada (varia- desta etapa. 

vel dependente), digitar as varidveis in- E possfvel passar diretamente da pri- 
dependentes para as quais a estima^ao ^ meira etapa para a terceira. Devido as 



ESTIMATIVA 

6-7-999 


DE <X> OU <Y> = Y 




PARA X= 


LIM. INF. Y EST. 


LIM. SUP. 


6 


3.65 

1.8583545 


5.4416455 


7 


4.52 

2.22B1194 


6.8118807 


NOVAS PROJEgOES ? (S/N) 



Figura 7 



altera^Oes que ocorrem em algumas va- 
ridveis na execu95o da 3? etapa, nSo 6 
possfvel o retorno & 2?. Para a represen- 
ta 9 ^o grdfica, os dados devem ser redi- 
gitados. 

Neste numero a estimativa foi efetua- 
da com base numa equa 9 <fo linear (linha 
reta). Ser^ que conseguimos ajudar o 
Jo^o ou uma estimativa n£o-linear (cur- 
va) seria melhor? Bern, isto veremos no 
pr6ximo numero. At^ Id, entdo. 

m 



Raul Udo Christmann 4 engenheiro e traba/ha 
co mo Assessor de Pesquisa Operacional na 
Adubo Trevos S.A . , onde utiliza um Burrou- 
ghs 6900. Professor de estatistica e pesquisa 
operacional nas UFSM e UFRGS, desde 1969, 
Raul desen volve, em case, programas educati- 
vos para a 4rea psico pedagdgica, por e n co- 
me n da. Tern um livro pub/icado pela Editora 
Edgard Blucher e outro pela Editora Campus. 
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iniciante 



Aprenda neste artigo a alterar, ler e escrever 
na memoria do micro. Faga isso 
usando os poderosos comandos BASIC... 



Nelson N. S. Santos 



Peeks e Pokes 



EEK e POKE sao “instru^Qes” da linguagem BASIC 
que permitem, respectivamente, verificar e alterar o 
conteudo da memdria. 

Nos micros mais populares (as familias Apple, Sinclair 
e TRS-80), a memdria estd organizada de tal maneira que seus 
conteudos sejam numeros de 8 bits. Logo, o conteudo de uma 
posi^ao de memdria pode ser qualquer numero bindrio entre 
0000 0000 e 1 1 1 1 llll,o que corresponde em decimal ao in- 
tervalo de 0 atd 255 (ver obs. 1), totalizando 256 possiveis 
conteudos diferentes. Observe: 

2 8 y = 256 
n<5 de bits 

Microprocessadores tais como o 6502 (Apple) e o Z-80 
(Sinclair e TRS-80), alem de um barramento de dados de 8 bits, 
tern um barramento de endere90s de 16 bits. Assim sendo, po- 
dem gerenciar uma memdria de 64 Kb. Vamos entender isso? 

2^ = 65536 = 64 * 1^24 = 64 Kb^ 

de bits pois 1 Kb = 10*24 

Naturalmente, o sistema operacional do micro e o BASIC 
residente irdo ocupar uma parte desta memdria, de tal forma 
que os 64 Kb ndo estardo inteiramente disponiveis ao usudrio 
para o armazenamento de programas e/ou dados. 

O comando POKE m,n coloca um numero n (0<n <255) 
na posi9<Io de memdria cujo endere9o d m (0<m <65535). Em 
verdade, o comando POKE so funcionard se o endere90 m cor- 
responder a uma posi9do da RAM, pois POKEs na drea da 
ROM sdo destrufdos pelo sistema operacional do micro, uma 
vez que a ROM deve ser preservada intacta. 

Certifique-se de ter entendido: o comando POKE 20000,51 
coloca o numero 5 1 na posi9do de memdria cujo endere90 d 
20000. 

Jd PEEK d uma fun9do cujo argumento d o endere90. Ela 
permite verificar o conteudo de qualquer posi9do da memdria. 
Por exemplo, 

A = PEEK (20000) 



“apanha” o numero armazenado na posi9ao de memdria ende- 
re9ada por 20000 e o associa a varidvel A. Por sua vez, 

PRINT PEEK (20000) 
exibe este numero na tela. 

PEEK pode ser usado para examinar o conteudo da memd- 
ria, para ver como programas BASIC sdo armazenados ou para 
examinar o conteudo da ROM. O programa a seguir verifica o 
conteudo de qualquer pos^do da memdria: 

10 PRINT "DIGITE O ENDEREgO" 

20 PRINT "BNDEREgO", "CONTEODO" 

30 INPUT E 

40 IF E*>INT(E) OR E<0 OR E>65535 THEN PRINT E» "ENDEREgO INVALIDO" 
50 PRINT E , PEEK (E) 

60 GOTO 30 
70 END 

Uma vez que o comando POKE permite alterar o conteudo 
da memdria, deve ser usado com muito cuidado. Colocar inad- 
vertidamente um valor na drea de memdria ocupada por um 
programa BASIC alterard este programa, podendo fazer com 



15360 


15361 


15362 


• 


• 


• 


• 


15423 


15424 


15425 


15426 


• 


• 


• 


• 


15487 


15488 


15489 


15490 


• • • • 


15551 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


• 


16320 


16321 


16322 


• 


• 


• 


• 


16383 



Figura 1 - A tela do TRS-80 tem 1024 (1 Kb) posifdes para caracteres. 
No diagrama, as posi^des dos caracteres estdo marcadas pelos enderefos 
da memdria nos quais elas estdo mapeadas. 
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Figura 2-0 efeito do comando POKE na memdria da tela. O comando 
POKE (a) coloca no enderego 15360 o conteudo 42 (b). Mas a locagdo 
15360 esta mapeada ao canto superior esquerdo da tela. O gerador de 
caracteres (c) mostra que 42 t o cddigo ASCII para “."Assim, a tela 
aparece como em (d). 

que urn programa correto comporte-se inadequadamente na 
proxima vez em que for rodado. Por outro lado, POKE pode 
ser introduzido num programa para fazer com que ele se auto- 
modifique ao rodar, o que abre uma imensa gama de aplica- 
95es. Programas que renumeram outros programas BASIC ba- 
seiam-se neste principio. Programas em linguagem de mdqui- 
na tambem s5o carregados na memdria atraves de comandos 
POKE (ver obs. 2). 

A maioria dos micros, entre eles a famflia TRS-80 (CP-500, 
DGT-1000, SYSDATA III etc.), tern telas mapeadas na memd- 
ria. Seus displays de tela sSo produzidos examinando o conteu- 
do de uma particular area da memdria: diz-se que a tela estd 
mapeada nesta regiSo. Para dar um exemplo concreto, vamos 
considerar a familia TRS-80. Sua tela tern 16 linhas ao longo 
das quais um carater pode ocupar qualquer uma das 64 posi- 
9<3es, produzindo 1024 (1 Kb) pos^Oes de caracteres ao todo. 
Em qualquer instante o display e produzido, examinando as lo- 
ca^des de memdria com endere^os de 15360 a 16383. A forma 



pela qual a tela e mapeada na memdria 6 mostrada na figura 1 . 
Quando um numero e armazenado em uma destas loca^oes, o 
carter cujo cddigo e este numero aparece na posi^o corres- 
pondente da tela. 

Conseqiientemente, o comando POKE pode ser usado para 
gerar displays numa tela mapeada na memdria, fazendo com 
que ele coloque os numeros apropriados na memdria da tela. 
A figura 2 ilustra a seqiiencia de eventos que ocorrem quando 
um simples comando POKE 6 usado desta maneira. 

Assim, para colocar um asterisco no canto superior esquer- 
do do video, voce deve fazer: 

a) Linha TRS-80 

POKE 15360,42 

b) Linha Apple 

POKE 1024,42 (ver obs. 3) 

c) Linha Sinclair 

LET DF=PEEK 16396+256*PEEK 16397 
POKE DF+1,23 (ver obs. 4) 

ALGUMAS OBSERVANCES 

OBS. 1 - E bastante usual, e comodo, exprimir-se o conteudo 
de uma posi^o de memdria em hexadecimal, no intervalo de 
OOaFF. 

OBS. 2 — Sobre o uso de comandos POKE, para carregar na 
memdria programas em linguagem de m^quina, aguarde o ar- 
tigo “O que sao, e como digitar, programas em linguagem de 
mdquina”. 

OBS. 3 — Enquanto na linha TRS-80 a primeira pos^ao da tela 
tern endere^o 15360, na familia Apple este endere 90 e 1024. 
OBS. 4 - A tela dos Sinclair e mais complicada. Para come 90 
de conversa, o endere 90 inicial do arquivo nao e fixo, flutuan- 
do entre o programa BASIC e a area das varidveis. Alem dis- 
to, este endere 9 o nao corresponde ao canto superior esquerdo 
da tela: na verdade, o conteudo desde endere 90 nao pode ser 
alterado por POKE sob pena de perda de controle (CRASH); 
o canto superior esquerdo da tela corresponde ao prdximo en- 
dere 90 . E mais ainda: os codigos dos caracteres n5o seguem o 
padrJo ASCII. Consulte o manual ou um livro sobre o assunto. 

Nelson N. S. Santos 6 professor de Quimica e Mat emetic a. Usudrio de 
um micro de Idgica Sinclair , 6 autor do livro AI6m do BASIC, sobre lin- 
guagem Assembler para I inha Sinclair, recentemente langado pela edito * 
ra Campus. 
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Ao final desta serie de artigos, o leitor e usuario de Apple podera 
dispor do mapa geral da memoria. lnforme-se e bom proveito 



Apple: 

o mapa da ROM (III) 

A Ido Felicio Naletto Junior 



N este numero, concluiremos o Mapa da ROM do Apple 
apresentando a parte do Sistema Operacional. A se- 
guir, mostraremos o Mapa Geral da Memdria: ele dd 
uma visao global de como a memdria e ocupada pelo 
Apple, especificando as varidveis do sistema, os endere^os da 
area de entrada/sai'da etc. Como no mapa da ROM, ser£o usa- 
dos sinais nos primeiros 256 bytes para identificar as posi^des 
desta £rea conforme seu uso. 0 sinal “%” significa variavel es- 
peciTica do sistema e o sinal '"Si' variavel de uso geral ou tem- 
porario. 

As variaveis.do primeiro tipo s2o usadas pelo sistema para 



guardar vdrios parametros necessarios ao seu funcionamento, 
enquanto as outras sd tern utilidade para ele durante a execu- 
te) das rotinas que as empregam, podendo ser utilizadas pelo 
usudrio fora disto. 



Aldo Felicio Naletto Junior tern 26 anos, £ engenheiro eletrOnico 
formado pel a Escola de E n gen h aria de S3o Carlos , da USP, trabalha 
como pesquisador do Projeto CATE, da Telebras, no laboratdrio de 
E/etretos do Instituto de Fisica e Quimica de SSo Carlos e no Banco do 
Brasil. Com um colega tern uma empresa de processamento de dados e 
implan tagao de sistemas. 




SF0OO-FFFF - ROM DO SISTEMA OPERACIONAL 

$F0OO t PLOT ponto de coordenadaa (T.A) 

SF819 t HLIN 81.B2 AT V - HI ea Y, H2 ett 52C e V ea A 

SF02S ! VLIN VI, V2 AT H - VI ea A. V2 ea S2D e B ea Y 

SF032 ! Apaga pagina grafica de baixa reeolucao 

SF036 ! Idea, porea deixando ea quatro linhaa infer iorea intactaa 

SF047 l Calcul a ea S26-27 o endereco do Inicio da linha de nuaero A 
(rotina uaada ea graflcoa de baixa renolucao - A entre 0 e 23) 

SF05F ! COLOR - COLOR ♦ 3 (aoaa 3 a cor de baixa reeolucao corrente) 
SF064 ! Fax COLOR-A (eatabelece cor de baixa reeolucao nuaero A) 

SF071 ! Volta ea A a cor do ponto de baixa reeolucao (Y.A) 

SF002 • Rotina do aonltor aaaeabler 

SF0DO : Dieaaaeabla a PRINTa inatrucao apontada por 33A-3B 

SF940 ! PRINTa conteudo de YX ea hexadeciaal 

SF941 ! Idea, porea conteudo de AX 

3F94S ! PRINTa 3 eapacoa 

SF94A ! PRINTa X eapacoa 

SF953 # Rotina do aonltor aaaeabler 

SF962-FA3F - Tabelaa do dtaaaaeabler 

3FA40 • Rotina de BRK ou interrupcao IRQ - Vetor de interrupcao ea 
S3FE. vetor do BRK ea S3F0 (ae for BRK. aalva antea oa regiatra- 
dorea atravea da rotina 9FF4A) 

3FA62 I Inicial ixacao geral ou RESET - Executa PR#0 . IN#0 . TEXT - Ve ae 
a* RESET do teclado ou inicial ixacao geral atravea daa poaicoea 
53F3 e 33F4 (a prieeira EOR #3A5 deve aer igual a aegunda) - Pula 
para o vetor RESET (ea 33F2) ae for RESET do teclado - 8e for 
inicial ixacao geral, carrega a tabela de vetorea ae 33F0/83F4, 

PRINTa nenaagen inicial e varre Biota de 7 ate’ 1 bu * c *"J° ^ai- 
de controlador de dieco - Se encontrar. ealta para o alot correa 
pondente. aenao vai pra SEOOO (partida a frio da linguagee reai- 

9FAD7*?^Pula linha e noatra oa regiatradorea aalvoa pela rotina 9FF4A 
3FADA t Idee, poree aee pular linha .cnnoi 

SFAFD-FB1D - Tabelaa do eomtor (eenaagea de inicial ixacao ex sfbuvj 
3FB1E l Volta ee Y leitura do paddle X (Y entre 0 e 255) 

9FB2F i Executa HOME e TEXT 
9FB39 I Rotina TEXT 

SFB3C ! So volta aa eargena originaia 

3FB40 I Rotina OR 

3FB5B ! VTAB A (A entre 0 e 23) 

SFB60 • Apaga a tela e PRINTa eenaagee inicial 
3FB6F • Oera a eenha do RESET do teclado 

3FB70 i PRINTa o caracter contido ee A - Reconhece CTRL-S 
SFB97 # Rotinaa do eodo ESC . 

3FBC1 ! Calcul a ee 320-29 o endereco inicial da linha A do video 
(A entre 0 e 23) 

3FBDD I Da ue bip no alto-falante 

3FBF0 ! Poe no video o byte contido ea A e avanca o cureor 

3FBF4 I Avanca cureor uaa poaicao .. 

3FBFD i PRINTa o caracter contido ee A ee eodo noraal - Acelta carac 
terea de controle 

9FC10 ! Volta o curaor uaa poaicao (ae nao eativer na pnaeira poaicao 
da priaeira linha) . . 

9FC1A ! Sobe o curaor uaa linha (ae nao eativer na prieeira linha) 



9FC2C • Interpreta caracterea no »*do ESC 
9FC42 I Apaga a tela do curaor ea diante 

9FC46 ! Idea a partir da linha A. coluna Y (aaboa coaecaa ea 0) 

3FC62 I Pula para o lnicio da proxiaa linha (CTRL-M ou <RETURN>) 

9FC66 I Deace uaa linha (CTRL-J) 

9FC70 I Da acroll de uaa linha na tela 

9FC9C I Apaga linha do curaor ea diante 

9FC9E ! Idea, porea da poaicao Y ea diante 

9FCAS I DELAY - Para o coaputador por ua teapo igual a: 

2 

.5 * ( S*A ♦ 27*A ♦ 26 ) aicroaegundoa 

Seta foraula lnclul o teapo toaado pela inatrucao JSR 9FCA0 
9FCB4 « Rotina uaada pelo aonltor aaaeabler 
9FCC9 I Rotinaa uaadaa na gravacao ea fita 
9FCEC • Rotinaa uaadaa na leitura ea fita 

9FD0C ! Liga curaor e eapara tecla aer acionada (ou entrar caracter 
pelo alot def inldo no ultiao coaando IN#) - Volta caracter ea A 
9FD1B # Rotina original do teclado - Eapera tecla aer acionada 

increaenta a aeaente aleatoria enquanto eepera - Apaga cureor 
9FD35 l Meaaa coiea que 9FD0C. porea aceitando o aodo ESC 
9FD67 ! Pula uaa linha. PRINTa caracter contido ea 333. entra linha 
de ate 255 caractea pelo teclado (ou alot definido pelo ultiao 
IN#) - Volta a linha no buffer de teclado e a extenaao ea X 
3FD6A ! Idea, porea aea pular linha 

3FD6F ! Meaaa coiaa. porea aea PRINTar o caracter contido ea 333 
9FD0B ! Apaga reato da linha do curaor e pula para a aeguinte 
3FD92 • PRINTa endereco para lietagea ea hexadeciaal 
9FD99 1 PRINTa conteudo de YX ea hexa , no foraato "YYXX-* 

SFDB3 1 PRINTa ea hexa bloco de aeaoria cujoa inicio e fia eatao ea 
33C-3D e 33E-3F 

9FDC6 # Rotina do aonltor aaaeabler 
9FDDA ! PRINTa ea hexa o conteudo de A 

3FDED ! PRINTa caracter contido ea A no video (ou alot aelecionado 
pelo ultiao PR#) 

SFDFO ! Rotina original de video - PRINTa caracter contido ea A 
Ace l ta aodoa NORMAL e INVERSE 

9FE00-FF3E - Rotinaa de mterpretacao de coaandoa do aonitor aaaeabler 
9FE10 # Coaandoa ♦ • . 

9FE20 # Coaando < t _ . 

9FE2C 1 Coaando M - Tranafere bloco de aeaoria cu3oa enderecoa de 

inicio, fia e "novo inicio* eatao ea 33C-3D. 33E-3F e 342-43 - 0 
"novo inicio* e' a poaicao onde vai coaecar o bloco de aeaoria 
apoa ter aido tranafendo, e deve aer O ao inicio. Entrar cob Y-0 
3FE36 ! Coaando V - Coapara bloco de aeaoria cu3oa enderecoa de inicio 

e fia eatao ea 33C-3D e 33E-3F coa outro bloco coaecado ea 342-43 

- Iapriae endereco e byte do priaeiro bloco aeguido do byte do 
aegundo quando encontra diacrepancia - Entrar coa Y-0 
9FE5E # Coaando L 

3FE61 ! Llata 20 inatrucoea dlaaaaeabladaa. coaecando pelo endereco 
contido ea 33A-3B 
3FE63 ! Idea, porea A inatrucoea 
3FE80 ! Coaando I 
3FES4 ! Coaando N 
3FE09 ! Executa IN#0 

3FE8B ! Executa IN#A 
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TRES MODENS EM UM 




MULTI-MODEM DIGITUS 



0 MULTI-MODEM foi projetado pela DIGITUS 
para atender aos usuarios de microcomputado- 
res que utilizam qualquer tipo de comunicapao 
com transmissao e receppao de dados assi'n- 
cronos seriais. 

A principal caracteristica do MULTI MODEM e 
operar com tres velocidades em urn unico mo- 
dem, ou seja sao tres modens em urn. 

Usando qualquer microcomputador, desde que 
possua uma RS-232, voce tera acesso a todos 
os sistemas de informapoes que utilizam as ve- 
locidades de 300 bauds Full-duplex, 1200 bauds 
Half-duplex e 1200/75 bauds Full-duplex. 

O MULTI-MODEM, fabricado pela DIGITUS, tern 
alem das varias vantagens que o tornam um 
modem versatil, pratico e de facil utilizapao, a 
garantia da tecnologia DIGITUS. 




Matriz: Rua Gavea, 150 • Jardim America Fone: (031) 332.8300 • Telex: 3352 30000 Belo Horizonte • MG 
Filiais: Rua Barata Ribeiro, 391 ■ SI. 404 - Copacabana Fone: (021) 257.2960 22040 • Rio de Janeiro - RJ 
Rua Faxina, 47 • Centro Fone: (Oil) 572.0137 • 04008 Sao Paulo • SP 






ofdnpojdilV 





Micro 
Fichas 



Tabela Z80 

(Grupos ED, DD, FD, DD CB, FD CB) 









Grupo ED 








Grupo FD 


Grupo DD CB 


Grupo FD CB 




Grupo DD 


64 


40 


IN B, (C) 


121 


79 


OUT (C),A 


9 


09 


ADD IY.BC 


6 


06 


RLC (IX+d) 


6 


06 


RLC (1 Y+d) 


9 


09 


ADD IX, BC 


65 


41 


OUT (C),B 


122 


7A 


ADC HL.SP 


31 


19 


ADD IY.DE 


14 


0 E 


RRC (IX+d) 


14 


OE 


RRC (lY+d) 


25 


19 


ADD IX. DE 


66 


42 


SBC HL.BC 


123 


7B 


LD SP,(dd) 


33 


21 


LD Yl.dd 


10 


16 


RL (IX+d) 


10 


16 


RL (lY+d) 


33 


21 


LD IX, dd 


67 


43 


LO (dd).BC 


160 


A0 


LDI 


34 


22 


LD (dd).YI 


30 


IE 


RR (IX+d) 


30 


IE 


RR (lY+d) 


34 


22 


LD (dd),IX 


68 


44 


NEG 


161 


A1 


CPI 


35 


23 


INC IY 


38 


26 


SLA (IX+d) 


38 


26 


SLA (lY+d) 


35 


23 


INC IX 


69 


45 


RET N 


162 


A2 


INI 


41 


29 


ADD YI.YI 


46 


2E 


SRA (IX+d) 


46 


2E 


SRA (1 Y+d) 


41 


29 


ADD IX.IX 


70 


4fi 


IM 0 


163 


A3 


OUTI 


42 


2 A 


LD Yl.(dd) 


62 


3E 


SRL (IX+d) 


62 


3E 


SRL (1 Y+d) 


42 


2A 


LD IX, (dd) 


71 


47 


LD 1 A 


168 


A 8 


LDD 


43 


28 


DEC IY 


70 


46 


BIT 0.(IX+d) 


70 


46 


BIT 0(1 Y+d) 


43 


2 B 


DEC IX 


72 


48 


IN C (C) 


169 


A9 


CPD 


52 


34 


INC (lY+d) 


78 


4E 


BIT 1 .( IX+d) 


78 


4E 


BIT 1,(IY+d) 


52 


34 


INC (IX+d) 


73 


49 


OUT (C),C 


170 


AA 


IND 


53 


35 


DEC (lY+d) 


86 


56 


BIT 2.( IX+d) 


86 


56 


BIT 2,( 1 Y+d) 


53 


35 


DEC (IX+d) 


74 


4 A 


ADC HL.BC 


171 


AB 


OUTD 


54 


36 


LDilY+d).d 


94 


5E 


BIT 3, (IX+d) 


94 


5E 


BIT 3,(IY+d) 


54 


36 


LD (IX+d),d 


75 


4 R 


LD BC,(dd) 


176 


B0 


LDIR 


57 


39 


ADD IY.SP 


107 


66 


BIT 4, (IX+d) 


107 


66 


BIT 4.(1 Y+d) 


57 


39 


ADD IX.SP 


77 


4D 


RET 1 


177 


B1 


CPIR 


70 


46 


LD B.OY+d) 


110 


6 E 


BIT 5, (IX+d) 


110 


6 E 


BIT 5.(1 Y+d) 


70 


46 


LD B.(IX+d) 


79 


4F 


LD R.A 


178 


B2 


IN IR 


78 


4E 


LD C,(l Y+d) 


118 


76 


BIT 6 ,( 1 X+d) 


118 


76 


BIT 6.(1 Y+d) 


78 


4E 


LD C,(IX+d) 


80 


50 


IN D,(C) 


179 


B3 


OTIR 


86 


56 


LD D,(IY+d) 


126 


7E 


BIT 7,(IX+d) 


126 


7E 


BIT 7,(IY+d) 


86 


56 


LD D.(IX+d) 


81 


51 


OUT (C),D 


184 


B 8 


LDDR 


94 


5E 


LD E.(IY+d) 


134 


86 


RES 0.(1 X+d) 


134 


86 


RES 0.(IY+d) 


94 


5E 


LD E,(IX+d) 


82 


52 


SBC HL.DE 


185 


B9 


CPDR 


102 


66 


LD E,(l Y+d) 


142 


8 E 


RES 1,(1 X+d) 


142 


8 E 


RES 1 ,(IY+d) 


110 


6 E 


LD L,(IX+d) 


83 


53 


LD (dd^DE 


186 


BA 


INDR 


110 


6 E 


LD L,(IY+d) 


150 


96 


RES 2,(IX+d) 


150 


96 


RES 2 ,(IY+d) 


112 


70 


LD (IX+d),B 


86 


56 


IM 1 


187 


BB 


OTDR 


112 


70 


LD (IY+d ),8 


158 


9E 


RES 3,(IX+d) 


158 


9E 


RES 3.(IY+d) 


113 


71 


LD (IX+d),C 


87 


57 


LD A.I 








1 13 


71 


LD (1 Y+d),D 


166 


A 6 


RES 4, (IX+d) 


166 


A 6 


RES 4,(1 Y+d) 


114 


72 


LD (IX+d).D 


88 


58 


IN E (C) 








114 


72 


LD (IY+d),C 


174 


AE 


RES 5,(IX+d) 


174 


AE 


RES 5,(1 Y+d) 


115 


73 


LD (IX+d),E 


89 


59 


OUT (C),E 








115 


73 


LD (IY+d),E 


182 


B 6 


RES 6 # ( IX+d) 


182 


B 6 


RES 6.(1 Y+d) 


116 


74 


LD (IX+d),H 


90 


5A 


ADC HL.DE 








116 


74 


LD (IY+d),H 


190 


BE 


RES 7. (IX+d) 


190 


BE 


RES 7,(IY+d) 


117 


75 


LD (IX+d),L 


91 


58 


LD DE.(dd) 








117 


75 


LD (IY+d),L 


198 


C 6 


SET 0,(IX+d) 


198 


C 6 


SET O.d Y+d) 


119 


77 


LD (IX+d), A 


94 


5E 


IM 2 








119 


77 


LD (IY+d),A 


206 


CE 


SET 1,(1 X+d) 


206 


CE 


SET 1 ,(IY +d) 


126 


7E 


LD A,(IX+d) 


95 


5F 


LD A,R 








126 


7E 


LD A, (lY+d) 


214 


D 6 


SET 2, (IX+d) 


214 


D 6 


SET 2,(IY+d) 


134 


86 


ADD (IX+d) 


96 


60 


IN H,(C) 








134 


86 


ADD (1 Y+d) 


222 


DE 


SET 3,(IX+d) 


222 


DE 


SET 3 ,(IY+d) 


142 


8 E 


ADC (IX+d) 


97 


61 


OUT (C),H 








142 


8 E 


ADC (1 Y+d) 


230 


E 6 


SET 4, (IX+d) 


230 


E 6 


SET 4,(IY+d) 


150 


96 


SUB (IX+d) 


98 


62 


SBC HL.HL 








150 


96 


SUB (lY+d) 


238 


EE 


SET 5,(IX+d) 


238 


EE 


SET 5,(1 Y+d) 


158 


9E 


SBC (IX+d) 


99 


63 


LD (dd),H L 








158 


9E 


SBC (1 Y+d) 


240 


F 6 


SET 6 ,(IX+d) 


240 


F 6 


SET 6 ,(IY+d) 


166 


A 6 


AND (IX+d) 


103 


67 


RRD 








166 


A 6 


AND (lY+d) 


254 


FE 


SET 7,(IX+d) 


254 


FE 


SET 7.(1 Y+d) 


174 


AE 


XOR (IX+d) 


104 


68 


IN L,(C) 








174 


AE 


XOR (1 Y+d) 














182 


B 6 


OR (IX+d) 


105 


69 


OUT (C),L 








182 


B 6 


OR (lY+d) 














190 


BE 


CP (IX+d) 


106 


6 A 


ADC HL.HL 








190 


BE 


CP (lY+d) 














225 


El 


POP IX 


107 


6 B 


LD HL,(dd) 








225 


El 


POP IY 














227 


E3 


EX (SP)IX 


111 


6 F 


R LD 








227 


E3 


EX (SP).IY 














229 


E5 


PUSH IX 


114 


72 


SBC HL.SP 








229 


E5 


PUSH IY 














233 


E9 


JP (IX) 


115 


73 


LD (dd),SP 








233 


E9 


JP (IY) 














249 


F9 


Ln SP,IX 


120 


78 


IN A,(C) 








249 


F9 


LD SP, IY 





















SOLUQAO 





A JOTEC CONSULTORIA E SISTEMAS 
TEM A SOLUQAO PROFISSIONAL 
PARA A SUA EMPRESA. 




CPM 

e compativeis 
(8 bits) ORTN's 


IBM -PC 

e compati'veis 
(16 bits) ORTN's 




Contabilidade 


63 


70 




Folha de Pagamento + 
Ficha Financeira 


- 


85 




Estoque 


43 


45 


• 


Faturamento 4- Estoque + 
Control e de Recebimentos 


160 


180 




Controle de Recebimentos 


53 


56 




Controlede Recebimentos + 
Cheques 


70 


- 




Controle de Pagamentos 


53 


56 


• 


Controle de Recebimentos 
& Pagamentos 


95 


98 




Controle Bancario 


10 


10 




Mala Direta 


29 


30 




Locagao de Imbveis 


90 


— 




Distribuidoras & Atacadistas 


400 


— 


• 


" ELABORAMOSPROGRAMAS ESPECIFICOS 

CURSOS: Basic 1, Basic II, Basic III, Logica Estruturada. 
Cobol, Analise de Sistemas. 


• 


Consulte nossos analistas para maiores informagoes. 

j T B B 1 i~~ 1 I FONE: (011) 240-1682 




Rua Otavio Tarquinio de Souza, 609 - Campo Belo 
Sao Paulo -SP -CEP 04613 






^ARANTA 
SUA MS 
TODO MES ! 



Se voce deseja assinar MICRO SISTEMAS, preencha o 
cupom abaixo (ou uma xerox, caso voce nao queira 
cortar a revista): 



empresa- 



profissao/cargo_ 



enderego para r ernes sa 

cidade cep - 

Assinatura anual 
Micro Sistemas 



_estado_ 



Cr$ 79 000 



GRATIS! 6 NUMEROS ATRASADOS 



Preencha um cheque nominal a ATI Editors Ltda e envie 
para: 

Av. Presidente Wilson. 165/grupo 1210, Centro, Rio de 
Janeiro, RJ, CEP 20030 Tel. (021) 262-6306 
R Oliveira Dias, 153, Jardim Paulista, Sao Paulo, SP, CEP 
01433 tels.: (011) 853-7758. 881 5668 e 853 3800. 
Seu recibo ser3 enviado pelo correio. 






APPLE: O MAPA DA ROM (III) 



SFE8D ! Coaando CTRL-K - Nuaero do Blot ea S3E 

3FE93 ! Executa PR|0 

3FE95 ! Executa PR#A 

SFE97 ! Coaando CTRL-P - Nuaero do slot ea 33E 

3FEB0 ! Coaando CTRL-B - Cuidado! Apaga o prograaa «a BASIC i 

3FEB3 ! Coaando CTRL-C - So volta ao BASIC 

3FEB6 | Coaando C 

3FEB9 I Volta reglatradorea aalvoa pala rotina 3FF4A a aalta para o 
andaraco contldo aa 33A-3B 
3FEBF ! Coaando CTRL-E 

3FECA ! Coaando CTRL-Y 

3FECD ! Coaando U - Crava na fita bloco da aeaoria cujoa andaracoa da 
inicio a fia aatao aa 33C-3D a 33E-3F 
3FEF6 • Coaando <RETURN> 

3FEFD ! Coaando R - La do gravador bloco da dadoa qua aara araazenado 
antra oa andaracoa da lnicio a fia contidoa naa poalcoaa 33C-3D a 
33E-3F - PRINT* "ERR” aa houvar arro na laitura ou o bloco gravado 
nao for do taaanho corrato 

3FF3A I Manda CHR3(7) para o vldao ou alot aalaclonado palo ultlao 
PR| (toca bip no altofalanta a* for para o vldao) 

3FF3F I Raataura ragiatradoraa (aa foraa alvoa pala rotina 3FF4Aj 
3FF4A i'Salva ragiatradoraa A.X.Y.P a S naa poalcoaa 343 ate’ 349 
3FF59 • Saquencia da rotina BRK - Executa NORMAL , HOME , PR# 0 a IN#0 a 
antra no aonitor aaaaablar 

3FF69 ! Entrada do aonitor aaaaablar - PRINT* e eapara linha da 

coaandoa - La valor digltado no lnicio da linha ata achar caractar 
da coaando - Deixa o valor ea 33E-3F - Intarpreta o caractar da 
coaando (toca bip a volta a 3FF69 aa o coaando for invalido) 

3FFA7 ! CONVHEX - Lw valor hex* coaacado aa 3200+Y - Deixa raaultado 
aa 83E-3F a. aa a poalcao 331 for <> 0, taabea aa 33C-3D a 840-41 
3FFBE • Rotina da axacucao da coaandoa do aonitor aaaaablar 
3FFCC-FFF9 - Tabela de coaandoa do aonitor aaaaablar 
8FFFA-FFFB - Vator da intarrupcao NMI - 303FB 
3FFFC-FFFD - Vator da inlcial izacao garal - 3FA62 

3FFFE-FFFF - Vator da intarrupcao IRQ a da matrucao BRK - 3FA40 



Memoria do sistema 



30000-07FF - MEMORIA DO SISTEMA 

SOOOO-OOFF - VARIAVEIS DO SISTEMA 
300-02 t Inatrucao JMP SD43C (JMP READY) 

303-05 * Inatrucao JMP SDB3A (JMP PRINTLIN) 

306-09 - Sea uao 

30A-0C t JMP da USR - Endaraco da rotina ea SOB-OC 
30D-10 L Diveraoa uaoa 

311-12 t TIPOAC - Tlpo do valor contldo ea ACS0FT1 

313 1 Diveraoa uaoa 

314 l Flag uaada ea BUSQVAR 

315 I. Flag uaada ea INPUT/CET/READ 

316 l Codlgo da coaparacao 

317-19 - Sea uao 

31A-1D L. Uaadaa naa rotinaa de alta reaolucao 
3 IE- 1 F - Sea uao 

320 t MARGESQ - Margea eaquerda da janela da texto (de 0 a 39) 

321 t LARG - Largura da Janela da taxto (de 0 a 39) 

322 t MARGSUP - Margea auperior da janela da taxto (da 0 a 23) 

323 « MARGINF - Margea inferior da Janela de taxto (da 0 a 23) 

324 * HTAB - Poaicao horizontal do curaor (da 0 a 39) 

325 t VTAB - Poaicao vertical do curaor (da 0 a 23) 

326-27 &. Uaadaa ea graficoa 

328-29 i. Endaraco do lnicio da linha ea qua eata o curaor 
32A-2B l Uaadaa na rotina de acroll 
32C-2D A Uaadaa ea HLIN a VLIN 
32E-2F L Uaadaa no aonitor aaaeablar 

330 I COLOR - Cor corrante ea balxa reaolucao 

331 i. Uaada no aonitor aaaeabler 

332 t Modo da iapreaaao (uaada ea conjunto cob 3F3) : NORMAL-255, 

INVERSE-63. FLASH-127 

333 t Caractar do "proapt” durante a entrada da linha 

334 &. Uaada no aonitor aaaeabler 

335 &. Uaada na rotina de video 

336-37 t Endaraco da rotina de aaida (or iginalaente SFDF0 ) 

338-39 I Endaraco da rotina da entrada (ortni nalaente SFD1B) 

33A-43 L. Uaadaa no aonitor aaaaablar 

345-49 &. Contaa oa valorea doa regiatradorea A.X.Y.P a 3 apoa a 
axacucao da rotina 3FF4' 

34A-4D - Sea ua 

34E-4F « Saaanta alaatoria do aonitor - Nao uaada palo BASIC 
350-51 L Diveraoa uaoa 

352 I Aponta poaicao da PILHA3 ea qua entrara o proxiao DESCR 

353-54 t Aponta ultlao DESCR antrado na PILHA3 (354 e’ aeapre 00) 

355-5D « PILHA3 
35E-66 L Diveraoa uaoa 

367-60 I INI PROG - lnicio do prograaa ea BASIC 
369-6A I INI VARS - lnicio daa variaveia maples (LOMEM) 

36B-6C * INIMATR - lnicio daa variaveia lndexadaa 
36D-6E I INISTR - lnicio do eapaco atnng 

36F-70 t Aponta lnicio da part* Ja ocupada do eapaco string 
371-72 t Endaraco do eapaco reaervado pala rotina RESERVES 
373-74 t HIMEM - Ultiaa poaicao diaponivel da RAM 
375-76 « NUMLIN - Nuaero da linha atualaante aob intarpretacao 
377-78 I Nuaero da ultiaa linha interpretada antea de END/STOP 
379-7A l Endaraco da inatrucao atualaante aob intarpretacao 
37B-7C I Nuaero da linha do ultlao DATA lido 

37D-7E * Enderaco do proxiao dado a ear lido ea coaandoa DATA 

37F-80 L Uaadaa ea GET/READ/INPUT 

381-82 L None da vanaval aa BUSQVAR 

383-84 L Endaraco da vanaval ea BUSQVAR 

385-86 1 Meaaa coiaa. porea ea LET 

387-88 t Uaadaa aa GET/READ/INPUT 

389 L Uaada aa RESEXPR 

38A-8E &. Diveraoa uaoa 

38F l Uaada no raaana jaaanto da aeaoria atnng 
390-9C l Diveraoa uaoa 
39D-A1 t ACS0FT1 

3A2 t Sinai do ACSPF1 (bit 7 aatado para valorea negativoa) 
3A3-A4 L Diveraoa uaoa 
3A5-A9 t ACS0FT2 

3AA t Sinai do ACSPF2 (coao aciaa) 



SAB 

SAC 

3AD-AE 

3AF-B0 

SB1-C8 

3B7-C8 

3B8-B9 

3C9-CD 

3CE-CF 

SD0-D5 

3D6 



3D7 

SD8 

3D9 

3DA-DF 
SE0-E1 
$E2 
SF 1 

9*4 

SE5 

3E6 

SE7 

SE8-E9 
SEA 



t Byte extra do ACSPF2 - Uaado para maior preciaao 
t Byte extra do ACSPF1 (coao aciaa) 
t. Diveraoa uaoa 

t Pnaeira poaicao livre apoa o prograaa (LOMEM inicial) 
t Rotina PROXCAR 
I Rotina PEGCAR 
t PTRLIN 

t Seaante alaatoria do BASIC 

- Sea uao 

l Usadaa pelas rotinaa de alta reaolucao 
t FLAGPROT - Flag de prograaa protegido - Ponha aqui ua valor 
aaior qu* 127 dentro d* aeu prograaa e ele nao podera aaia 
aer xeratado, poia apoa laao todoa oa coaandoa diratoa 
aerao interpratadoa coao RUN 

- Sea uao 

« FLAGONERR - ONERR atlvo ae 3D8 >127 

- Sea uao 

t Uaadaa na aanipulacao de erroa quando ONERR eata atlvo 
t ULTIMOX - Coordenada horizontal do ultlao ponto H PLOT ad c- 
t ULTIMOY - Coordenada vertical do ultlao ponto HPLOTado 

- Sea uao 

t HCOLOR - Cor corrente de alta reaolucao 
L Uaada ea graficoa de alta reaolucao 
I MSB da pagina grafica de alta reaolucao corrente 
t SCALE - Val ot do ultlao SCALE exacutado 
t Endereco da ultiaa tabela de foraaa SHLOADada 
l Uaada ea graficoa de alta reaolucao 



SEB-EF - Sea uao 



3F0 

3F1 

SF2 

SF3 



SF8 

SF9 



4 Diveraoa uaoa 

« SPEED - Valor do ultlao SPEED executado 
t FLAGTRACE - TRACE ligado ae 3F2 >127 

t Modo de iapreaaao (uaada ea conjunto cob S32) : FLASH-64, 
NORMAL /INVERSE -00 
3F4-F7 « Uaadaa por ONERR 

t SATUAL - Valor de S no lnicio da inatrucao 
« ROT - Valor do ultlao ROT executado 
3FA-FE - Sea uao 

300FF-010F - BUFFER USADO EM TRADDEC 
SOI 10-01FF - PILHA DO SISTEMA E DO BASIC 
S0200-02FF - BUFFER DO TECLADO 
30300-03FF - AREA DE VETORES 

S300-3EF - Livre para o uauano (ae o DOS nao aativer preaente) 
S3F0-3F1 - Endereco da rotina do BRK (vetor BRK) 

33F2-3F3 - Endereco da rotina RESET (vetor RESET) 

33F4 - Senha RESET-taclado 

33F5-3F6 - Enderaco do coaando l do BASIC 

33F7 - Nada 

33F8-3F9 - Enderaco do coaando CTRL-Y do aonitor aaaeablar 
S3FA - Nada 

S3FB-3FC - Endereco da intarrupcao NMI (vator NMI) 

33FD - Nada 

33FE-3FF - Endereco da interrupcao IRQ (vator IRQ) 

S400-7FF - MEMORIA DE VIDEO 



S0800-BFFF - 


AREA USADA PELO BASIC 


S0800-0BFF 


_ 


Pagina 2 de baixa reaolucao 


32000-3FFF 


- 


Pagina 1 de alta reaolucao 


$4000“5rFF 


- 


Pagina 2 de alta reaolucao 


3C000-CPFF - 


AREA DE ENTRADA/SAIDA 


3C000-C00F 


_ 


Porta do teclado 


SC010-C01F 


- 


Habilita teclado a recebar nova tecla 


3C020-C02F 


- 


Click no alto-falante 


SCO30-C03F 


- 


Click no gravador 


3C040-C04F 


- 


Pulao no conactor de jogoa 


SC050 


- 


Liga modo graflco 


SC051 


- 


Liga modo texto 


3C052 


- 


Dealiga a janela de 4 linhaa de texto 


3C053 


- 


Liga a Janela 


SC054 


- 


Seleclona pagina 1 


SC055 


- 


Seleciona pagina 2 


3C056 


- 


Seleciona baixa reaolucao 


SC057 


- 


Seleciona alta reaolucao 


SC058 


- 


Dealiga AN0 


3C059 


- 


Liga AN0 


3C05A 


- 


Dealiga AN1 


SC05B 


- 


Liga AN1 


3C05C 


- 


Dealiga AN 2 


SC05D 


- 


Liga AN2 


3C05E 


- 


Dealiga AN3 


3C05F 


- 


Liga AN3 


SC060 


- 


Laitura do gravador 


3C061 


- 


Le SW1 


SC062 


- 


Le SW2 


3C063 


- 


Le SW3 


3C064 


- 


Le paddle 0 


SC065 


- 


Le paddle 1 


SC066 


- 


Le paddle 2 


SC067 


- 


Le paddle 3 


3C068-C06F 


- 


Mesma coiaa que 3C060-SC067 


3C070-C07F 


- 


Diapara aonoeataveia doa paddlea 


3C080-C08F 


- 


Aceaao ao alot 0 


3C090-C09F 


- 


Idea alot 1 


3C0A0-C0AF 


- 


Idea alot 2 


3C0B0-C0BF 


- 


Idea alot 3 


3C0C0-C0CF 


- 


Idea alot 4 


SC0DO-C0DF 


- 


Idea alot 5 


3C0K0-C0EF 


- 


Idea alot 6 


3C0F0-C0FF 


- 


Idea alot 7 


SC100-C1FF 


- 


Area "habitada” palo alot 1 


3C200-C2FF 


- 


Idea alot 2 


3C300-C3FF 


- 


Idea alot 3 


3C400-C4FF 


- 


Idea alot 4 


3C500-C5FF 


- 


Idea alot 5 


SC600-C6FF 


- 


Idea alot 6 


3C700-C7FF 


- 


Idea alot 7 


3C800-CFFF 




Area de uao coaua para oa alota 


3D000-FFFF - 


ROMa 


3D000-F7FF 


_ 


INTERPRETADOR BASIC 


3F800-FFFF 


- 


SISTEMA OPERACIONAL 
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trs-80 trs-80 trs-80 trs-8 



Missao Impossfvel 

Ayrton Ribeiro da Costa Junior 



Missao Impossivel foi feito originalmente num DGT-100 
com 16Kb, versao cassete. Apresento, porem, duas versOes 
para micros compati'veis com os modelos 1 e III. Pode tarn- 
bem ser adaptado para o BASIC Disco, bastando, para isso, 
uma pequena modifica^o na linha 23 ue acordo com o siste- 
ma operacional. 

O programa apresenta uma rotina de erro que printa a pala- 
vra TILT. Se isso acontecer, por erro de digita^ao ou excesso 
de string, voce deve voltar ao comedo do jogo, recome^ando- 
o na medida do possivel. 

Ao rodar o jogo, voce vera que este possui uma parte com 
instru^Oes resumidas. Apos as instru^Oes, vira a mensagem 
“Prepare-se" e, alguns segundos depois, voce tera em seu visor 
um painel (veja figura 1 ) onde no quadro maior a esquerda 





SHIP 2 | | SHOP •> 




SHOP 1 


I SOW 3 




SOW 5 




Figura 1 

voce ver2 o seu canhao laser, o navio inimigo e os setores divi- 
didos em quadrantes a serem defendidos. A direita, voce vera 
um quadro. Na parte superior, o numero de pontos, e mais 
abaixo, o numero de vidas restantes; um radar de alerta (que 
acende o numero do setor cujo 49 quadrante foi atacado, apa- 
gando se o navio inimigo for destrui'do), e o recorde do dia e 
o nome do jogador que o conquistou. 

No final de cada partida ser £ mostrado seu numero total de 
pontos, de tiros certos e errados, alem do percentual de acerto. 
Caso seus pontos sejam um dos cinco maiores, voce poderd 
colocar seu nome ou iniciais e admira-lo na galeria dos “Me- 



OS MELH0RE3 DO DIO 


POtTOS 


NEDIQ DE ACERTO . 


Qyrton 


1450 


89-6 l 


Pose 


1280 


85.9 X 


Rose 


1210 


82-7 X 


Oyrton 


[ 1140 


83 X 


Rose 


■ 980 


81.9 X 



Voce quer jogar de novo ( S / N ) ? 



Figura 2 



lhores do Dia" (figura 2) ou ate mesmo no recorde do painel 
caso o seu placar tenha superado o antigo recorde. 

INSTRUCOES 

Voce esta a bordo de um submarino nuclear cuja missao e 
impedir que navios inimigos joguem bombas de profundidade 
e mudem de setor antes de voce acerta-los, evitando explodir 
as bombas pois, do contrario, o quadrante nao tera mais como 
ser recuperado e a marca referente a bomba n2o sumira de sua 
tela. 

Quando o navio atacar um setor que ja tern um quadrante 
destrui'do, seu alvo sera o quadrante logo abaixo e assim su- 
cessivamente, ate serem destrui'das as quatro posi^Oes na ver- 
tical de qualquer um dos setores, restando apenas a sua destrui- 
$ao ou a esperan^a de que o navio insista em atingir outro se- 
tor que n5o tenha sido destrui'do totalmente e voce, enquanto 
isso, consiga mudar de fase. 

Existem quatro fases e voce possui, de ini'cio, tres vidas para 
enfrenta-las. Cada tiro certo vale 10 pontos, porem, o mesmo 
serd cobrado por cada tiro errado. A cada duzentos pontos 
voce muda de fase, com os navios se movimentando cada vez 
mais rapido. 

Apos todas as fases terem sido ultrapassadas, voce permane- 
ce na fase quatro ate ceder ao inimigo, recebendo uma vida de 
bonus ou 50 pontos, caso j2 possua as tres vidas, cada vez que 
ultrapassa-la. Use as setas ( ) e ( <- ) para movimentar o ca- 



54 



MICRO SISTEMAS, julho/85 










nhao, a barra de espa^o para atirar e as setas (t )e(j)ao 
mesmo tempo para abortar o jogo. 

DICAS 

O melhor metodo de digita^o e bater o programa aos pou- 
cos e ir gravando sempre para continuar mais tarde. Ao acabar 
de digitar, nao se esquesa de gravar o programa antes de dar o 
“RUN”, e que para facilitar alguma possivel corre^ao deve ser 
retirado da linha 23 o POKE 16396,165 que trava o Break, re- 
colocando-o apos tudo estar correto. Apos tudo ter sido feito, 
e se ainda restar coragem, retina os amigos e descubra quern e 
o mais qualificado para enfrentar esta “Missao Impossivel”. 
Tome cuidado e boa sorte. 



Missao Impossivel (DGT-100) 

1 ’ MNMM 1984 - HISSAO IMPOSSIVEL HMMM 

2 ' MNMN FEITO POR AYRTON RIBEIRO DA COSTA JUNIOR MMMM 

3 ' NNNM PARA MICROS COMPATIVEIS COM TRS80 MODELO I 

4 AX-32738 1 CLS : G0SUB23 1 ONER R OROOTO 1 9 

5 G0SUB21 * CLS* PR INTTAB(13)" MISSAO IMPOSSIVEL "sP 
RINTTAB < 14)STRINGK 11,131 ) ;" "t STRINGK 19,131); 

6 PR1NT8462 , "Voce qucr instrucoe* ( S / N ) ";*INPUTIS 

7 IF IS="N"ORI%="n" ,9 

8 IF I*-"S"ORI*-"s". GOSUB 187ELSE6 

9 CL EAR 200 : RANDOM : D IMM ( 5 ) ,N<5> , HNS ( 6 ) , HGS < 6 ) , HMS ( 6 > *HG§ ( 1 > “"Ayr t 
on" *HNK 1 )-" 0000 

10 AC -0 s 01=0* 02=0 :W=1 sU0=45*VI-3 

11 IFHMK 1 )( >"",17 

12 0NERR0RG0T019 

13 ' Var i ive i s 

14 NIS-STRINGK3, 1761+CHRS ( 19®>+CHRK 188 ) +STR INGS ( 4 , 176 ) * A I %=STR 
INGK 9 , " "> 

15 N1KCHRK 16B)+CHRK 1 80 > * N2S-CHR* ( 184 ) +CHRK 1 90 ) +CHRK i 9® > +CHR 
K 188) +CHRK 144) 

16 A1S-STRINGK2," " ) * A2S-STR INGK 5, " " ) * GTS-CHRS ( 128 ) + CHRS < 161 ) 
♦ CHRK 160>+CHRK 134>+CHRK 131 ) +CHRK 137 ) + CHRS < 1 44 ) + CHR* ( 1 46 >+CHR 
1(128) 

17 CLS*F0RT-1T05*M< T)-<T-1 > • 1 0+2 s N ( T > -0* NEXTT s P A=® 

18 PR INTCHRK 23 > 8 PR INT8458 , "P REPARE-S E"» *F0RT-1T0500*NE 
XTT *CLS*G0T043 

19 CLS*PRINTCHRS<23) :PRINT3408,"T I L T"; *F0R T = 1T0100*SS-USR (128 
00+RND ( 50 ) ) *SS=USR ( 12800+20-RND ( 10>)s NEXTT * RESUMES 

20 PP=628+(2*PI > SPRINT SPP ,STR1( PI + 1) ; * RETURN 

21 CLSsPR INTCHRK 23) *PR INTSTR INGK 31 , "N") * PR INT * PR INT TAB (7>"MISS 

AO IMPOSSIVEL" SPRINT *PR INTSTR INGK 31 ,0") SPRINT8534, "FEITO POR"; 
8648, "AYRTON R. COSTA JUNIOR" ;8790, "P - 1984"; 

22 F0RT=lT02000*NEXTTsRETURN 

23 N=VARPTR (AX) * POK El 6526 , PEEK (N) SPOKE 16527, PEEK (N+l ) *P0KE16396, 
165 

24 FORI -AXT OAX+22 

25 READY* POKE I , YsNEXTI sRETURN 

26 DATA 205 ,127,10, 203 ,36,69,62,1,211, 255 ,16, 254 ,69.62,2.211, 255 
, 16,254,37,32,239.201 

27 FORT = 0T050STEP10*FOR I-277T0267STEP-1 *SS-USR (I+T)*NEXTI,T sRETU 

RN 

28 F 0RT-1T015®! SS-USR (2590 + T) SPOKE (15359+RND( 1024 > > , 131 *F0RU«1T0 
5*NEXTU,T SF0RU-50T02STEP-1 *SS=USR ( 5120+U) sNEXTU 

29 CLS s IFVI >0 , PR INT8336 , "Agora voce so' t em" ; VI ; "v i d a ( • ) . " | sGOTO 
4 1 EL SEP R INT8207 , "S * nt o , mas acabar am as vidas."; 

30 IFOl >0,HM1 = LEFTKSTRK ( 01 * 1 00 )/ ( 01+02 ) ) ,5>+" X"ELSEHMS=" 0.0 
X" 



31 PR INT8324 , "Voce f ez" ; AC ; "pont os , acertou";01 ;"t iro(»> e errou 
";02;".";8459,"Seu perccntual de acerto e' de ";HMS; 

32 PR I NT 859 3 , "Par a continuar ( RETURN >"; 

33 PS-INKEYK IFPK >CHRK 13 > , 33ELSE81 

34 AYS=""*PRINT89®9, "Voce quer jogar de novo ( S / N ) "» 

35 INPUT AYS 

36 IFA YS="s"0R AYS-"S" , 1 OELSE IFAYS="n"0R AYS="N" , NEUELSE34 

37 FORT- 1 T050 sNEXTT*F0RI-2T 050 sSS-USR ( 768+RND( I ) ) s NEXT I $F0R I -SOT 
02STEP- 1 * SS-USR ( 76B+I ) sNEXTI 

38 CLS s W-U + l s UO-UO-10 * IF W0>15 , PR I NT8337 , "Voce passou pa 
ra o nivel";W;"." * GOTO 41 

39 IFU-4 , PR INT8323, "Agor a voce permanecera ' no nivel 4 ate’ cede 
r aos in i a i gos.";ELSEPR INT8321 , "Voce conseguiu passar";U-4;"vez( 
es) , mas o desafio ainda continua."; 

40 WO-15 * IFW>4,IFVI(3,VI»VI *1 ELSE AC -AC *50 

41 PR INT8469 , "B 0 A SORTE I "; 8594 , "Par a continuar ( RETURN 

>"; 

4? BS-INKEYS* IFBS=CHRS( 13) , 17ELSE42 

43 ' Matrix 5x4 

44 FORA-1 T013 SPOKE 154 10+A, 10SPOKE156O2+A, 15 s P0KE15794 + A, 15 SPOKE i 
5922+A, 15IP0KE16050+A, 15sP0KE16306+A,21 sNEXTA 

45 FORB* 15475T016243STEP64 iPOKEB , 205 * POKE 8 ♦ 1 2,210sNEXTB 

46 PRINT8119, "PONT OS" ; 81 83 , AC ; 831 1 , "VIDAS" ; 8376 , STR INGK VI , 149) ; 
8500, "A L E R T A"; 8756," RECORDS "; 8822 , HNS ( 1 >; 8886 , HGS ( 1 > ; 

47 F0RA-0T0768STEP192 

48 F0RB-15426+AT01 5472+ASTEP2 

49 POKES, 15SNEXTB .A 

50 FOR A=0 T 050STEP 1 0 

51 F0RB-15424+AT016222+ASTEP64 

52 POKES , 208 * NEXTB , A 

53 PRINT8900.N1K8963.N2K 

54 P I =RND(5)-i sPD-P I + i 

55 PRINT 8P I*i®+1 , NIS ; 

56 IFN(PD)(4, DD=15360+M( PD )+192*(N(PD>+l ) * POKEDD , 188 s SS-USR ( 456 > 
s IFN ( PD ) =3, G0SUB20ELSE57ELSEVI -VI - 1 * GOT 028 

57 GOSUB 63 

58 N ( PD > =N( PD ) + 1 

59 PRINT 8P 1*10+1, AIK * G0T054 

60 POKEDD. 128 s IFN( PD ) -3 , POKE 15361 +PP , 128 

61 GOT 059 

62 ’ POSICAO AL I ADO 

63 FORY-1 T0W0*X=PEEK( 14400) 

64 IFX=0, 7 1ELSEIFX-24 ,101 

65 IFX = 32.PC=PAsPA=PA-10*F0RT-lT010sNEXTT *G0T068 

66 IFX-64,PC-PAsPA“PA+10*F0RT»lT010sNEXTTs GOT 068 

67 IFX-1 28 , G0SUB72 * RETURN 

68 IFP A( OORP A > 40 , P A=PC 

69 PR INT8900+PC , A1 S ; 8963+PC , A2S ; 

70 PRINT8900+PA.N1S; 8963+PA, N2S; 

71 NEXTYsRETURN 

72 ’ Tiro 

73 FORC- 16261 +PAT015365+PASTEP-64 

74 POKEC ,133 

75 SS-USR (RND( 20 )+1292) 

76 POKEC, 128SP0KE16261+PA, 180 

77 NEXTC 

78 IFPI«10+1-C-15300,PR INT8P 1*10+1 , GTS; sAC-AC+lOs 01-01 +1 sPR INT81 
83, AC* * GOSUB 27 * IFAC/W=200 , 37ELSEG0T060 

79 02-02+1 * IFAC >0 , AC-AC- 10 * PR I NT 8 1 83 , AC ; 

80 RETURN 

81 ’ Entrada no high-score 

82 IFHMS ( 1 > -""ANDAC > 0 , HGS ( 1 ) -"" * HNS ( 1 ) »"" 

83 CLS * GG-0 * ETS*"" * FORC- 1 T05 

84 IFAC > VAL ( HNK C ) ) ,86 

85 NEXTC sGOTO 100 

86 PRINTCHRS(23> *PR INTTA8 ( 6 ) "P A R A B E N S I " , , TAB ( 6 >STR INGS ( 1 
5,CHRS( 131 > > :PRINT8208,"Seu escore e r ","um dos 5 maiores do dia. 

"; 

87 PRINT"Favor colocar seu none du apenas suas iniciais e apert 
ar ( RETURN >."; 

88 P0KE16012.2PRINT8658," " 
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PROFISSIONAL DE GRANDE QUAUFICACAO 



MICROCOMPUTADOR 

MTS-IV 




0 MAIS RAPIDO DO MERCADO, 
FABRICADO POR QUEM FAZ A 
MELHOR MANUTENQAO. 
CONSULTE OS NOSSOS CLIENTES. 
AGORA TAMBEM 0 MODELO 
MTS/PC - XT 
DE 16 BITS. 



MAQUIS TECNOLOGIA E SISTEMAS LTDA 



MAQUIS 



Rio de Janeiro 
Av BarSo de Tef6 7 GR 501 /08 
Teiefone 263 3330 
TWX (021)30354 



S3o Paulo 
Av dos Imarfcs 999 
Teiefone 543 3511 
TWX (011)21299 







MISSAO impossiVel 



89 M* 3 INKEY** IFM*-""ANDGG< 24 , PR INT3594+GG. CHR*< 176 > » *F0RT-1T05*N 
EXTT *PR INT3594+GG, " " * *G0T089ELSE IFM*-CHR*< 13 ) , 92ELSEIFM*«CHR*< 8 
> ANOGG >0, PR I NT 3594 +00, " "* *ET*«LEFT*(ET*. (GG/4-1 )> *GG-GG-4*G0T08 
9 

90 IFGG*24 , 89ELSEPR INT3594+GG , M* * * GG“GG+4 *ET*-ET**H**G0T089 

91 ' Troca 

92 HN*(6)«STR*<AC> * HG* < 6 ) «E T* * HM* < 6 > -HM* 

93 M1-0*F0RB-CT05 

94 IF UAL < HN* < B > ) < UAL < HN* ( B ♦ 1 ) ) , G0SUB97 

95 IFM1 >0, 93 

96 NEXTB*G0T0100 

97 M1*«HN*(B ) *M2* 3 HG* < B ) *M3*«HM* ( B ) 

98 HN* < B ) =HN* ( B ♦ 1 > * HG* ( B ) -HG*< B ♦ t ) * HM* ( B ) -HM*( B ♦ 1 ) 

99 HN* ( B * 1 ) =M1 $ * HG*< B +1 > -M2* * HM* < B ♦ 1 )-M3**Ml«l * RETURN 
IBB * Guadro do high-score 

10 1 CLS * F OR A» 1 5365 T016192STEP1 28 *F0RB»AT0A+52* POKES . 15 * NEXTB , A 

102 FORA 3 15364 T01 61 32STEP64 x POKE A , 21 0* P0KEA-*23 , 208*POKEA*36 , 208* 

POKEA+54 , 205* NEXT A _ _ 

ie3 PR I NT37 1 , "OS MELHORES DO DIA" *395. "PONTOS *3106. MEDIA DE AC 
ERTO"* 

104 F0RB-1T05*A-B*128 

105 PRINT 877 ♦A , HG* ( B ) 1 395 ♦A , HN*< B > ? 31 09* A , HM* <8 ) V 

106 NEXTB *G0T034 

107 * Instrucoc* 

108 PR I NT 31 39 , "0 »cu objetivo e t»p*dtr quc o navio iniaigo. ocu 
P e os quadr antes cot < " *CHR»< 143 ) »" ) at* chegar a voce. Se oc 
•ipado. voce tea quc acertar o navio antes que o aesao aude de se 

tor, " I 

109 PRINT"pois do con-trar i o nao havera coao recuperar o quadran 
te."*PRINTTAB(ll)"Voce tea 3 vidas e 4 mveis para jogar. Cada t 
iro " l 

110 PRINT"va-le 10 pontos a serea soaados ou diainiuldos do seu 
escore depen-dendo apenas de sua pontaria e a cada 200 pontos vo 
ce auda de ni-vel. Apos todos serea ultrapassados, voce peraanec 
era no nivel 4 ate ceder ao iniaigo, *i 

111 PRINT"* a cada vez que ultrapassar esse nivel, recebera^usa 
vida de bonus, ou 50 pontos caso ja possua 3. " *PR INTTAB ( 1 1 > Use 

< "|CHR*<93)»" > e < "*CHR*<94)»" ) para aover seu canhao, a bar 
ra de espaco para atirar e < "»CHR*<91)i" )( "*CHR*<92)f 

112 PRINT" ) para abortar o jogo ." *PR INTTAB <21 > "B 0 A S 0 R T E 
i"*PRINTTAB( 18) "Par a contlnuar < RETURN >"» 

113 A*= INKEY** IFA*< >CHR* < 1 3 > , 1 1 3ELSERETURN 



Missao Impossi'vel (CP-500) 



39 IFU 3 4,PRINT3323, "Agora voce peraanecera' no nivel 4 ate' cede 
r aos in i s i gos." iELSEPR INT 3321 , "Voce conseguiu passar " *U-4 » "vez< 
ei) , mas o desafio ainda cont lnu»."i 

40 WO-15 * IFW)4,IFVX3,VI-VI ♦1ELSEAC-AC+50 

41 PR INT3469 , "B 0 A S 0 R T E I " * 3594 , "P ar a continuar < ENTER > 

"l 

42 B*"INKEY4* IF8* 3 CHR*< 13 ) ,17ELSE42 

43 ' Hatrlz 5x4 

44 F0RA«lT0t3*P0KE15410*A, 140* POKE 15602* A, 1 40 *P0KE15794*A, 140*P0 
KE15922+A , 1 40 * POKE 1 6050* A , 1 40 * POKE 16 306 ♦A ,131*NEXTA 

45 F0RB-15475T016243STEP64*P0KE8. 149* P0KE8* 12, 170* NEXTB* P0KE1 541 
1, 1 56 *P OK El 5423, 172 

46 PRINT3118, "PONT OS" 1 3182 , AC 1 331 1 , "VIDAS" » 3500 , "A L E R T A"»37 
56," REC0R0E "*3822 , HN*< 1 ) *3886, HG*< 1 >» *F0RT-1T0VI *P0KE15735*T 
, 253*NEXTT 

47 F0RA-0T0768STEP 192 

48 F0RB»15426*AT015472*ASTEP2 

49 P0KEB , 45 * NEXTB , A 

50 FOR A-0T 050STEP 10 

51 F0RB-15424*AT016222*ASTEP64 

52 P0KEB , 2*NEXTB , A 

53 PRINT3900, Nl*i3963,N2*l 

54 PI-RND<5>-t*PD-PI*l 

55 PRINT3PI»10*l,NI»* 

56 IFN<P0><4.D0-15360*M<PD>*192«<N<PD>*1 > *P0KEDD, 238* SS-USR < 456) 

* IFN< PD )-3 . G0SU820ELSE57ELSCVI -WX -1 *G0T028 

57 G0SUB 63 

58 N(PD>-N<PD>*1 

59 PRINT3PI«10*1.AI»**G0T054 

60 P0KEDD, 128* IFN< PD>-3, POKE 15361 *PP, 128 

61 GOT 059 

62 ’ P0SICA0 AL I ADO 

63 FORY-1TOUO*X-PEEK< 14400> 

64 IFX-0.71ELSEIFX-24,10i 

65 IFX-32,PC-PA*PA-PA-10*F0RT-1T010*NEXTT*G0T068 

66 IFX-64,PC»PA*PA-PA*iOsFORT-lTO10*NEXTT*GOTO68 
67- IFX«128,G0SUB72*RETURN 

68 IFPA< 00RP A >40 , P A“PC 

69 PR INT3900+PC , Al* ; 3963*PC , A2* * 

70 J*R INT3900+P A , N1 * » 3963*P A , N2*x 

71 NEXTY*RETURN 

72 ' Tiro 

73 FORC-16261 *PAT0i5365*PASTEP-64 

74 P0KEC.133 

75 SS-USR <RND< 20 ) *1292 > 

76 P0KEC,128*P0KE16261*PA,180 

77 NEXTC 

78 IFPIM0*l-C-t5300.PRINT3PI*10*l.GT%» *AC-AC* 10*01-01 LPlIMTJi 
82 , AC > * G0SUB27 * IFAC/W-200 , 37ELSEG0T060 

79 02-02*l*IFAC)0.AC«AC-10*PRINT3182,AC| 

80 RETURN 

81 ' Entrada no high-score 

82 IFHh* < 1 ) -""AND AC > 0 , HG* < 1 ) -"" * HN* < 1 > 

83 CLS*GG-0*ET*-""*F0RC-1T05 

84 IF AC > UAL < HN* ( C > > , 86 

85 NEXTC *GOT0100 

86 PR INTCHR*< 23) * PR INTTAB < 6) "P A R A B E N S f ", , TAB <6 )STR ING*< 1 
5, C HR *(131)) :PR INT3208 , "Seu escore e'",,"u* dos 5 naiores do dia 
. "t 

87 PRINT"Favor colocar seu none ou apenas suas iniciais c apert 
ar < ENTER >."* 

88 POKE 1 601 2, 244 * POKE 160 14, 245* POKE 160 16, 246* PR I NT3662," 

89 M*- 1 NKEY»* IFM*-""ANDGG< 24 ,PR INT3598*GG ,CHR*< 176 ) * *F0RT-1T05*N 
EXTT *PRINT3598*GG. " "» *G0T089ELSEIFM»-CHR*< 13) ,92EL8EIFM*-CHR*<8 
) ANDGG > 0 , PRINT 3598* GG , " "» »ET*-LEFT*<ET», (GG/4-1 ) ) *GG-GG-4*GOT08 
9 

90 IFGG-24 , 89ELSEPR I NT 3598*00 , N* y *GG-GG*4*ET*-ET»*MS*G0T089 

91 ' Troca 

92 HN* < 6 ) -STR* < AC ) * HG* < 6 ) -ET* * HM*< 6) -HH* 

93 Ml =0 * F ORB *CT05 

94 IFUAL < HN* < B ) ) < UAL < HN* < B*1 ) ) , G0SUB97 

95 IFM1 >0, 93 

96 NEXTB*GOT0100 

97 Mi*-HN* ( B ) * M2*-HG* < B ) *M3*-HM* < B ) 

98 HN*(B>-HN*<B*i) * HG* < B > -HG* < B* 1 ) * HM* ( B ) -HM* < B ♦ 1 > 

99 HN*(8*1 )-Mi**HG*(B*l ) -M2* * HM* < B ♦ 1 )-M3**Ml-l * RETURN 

100 ' Quadro do high-score 

101 CLS*F0RA-15365T016133STEP 128*F0RB-AT0A*52*P0KEB ,131* NEXTB, A 

102 F0RA«15364T0i6068STEP64*P0KEA, 170*P0KEA*23, 191 *P0KEA*36, 191* 
P0KEA*54, 149 *NEXTA*POKE 16132, 130*P0KE16186, 129 

103 PRINT371 , "OS MELHORES DO DIA" * 395, "PONTOS" *3106 , "MEDIA DE AC 
ERTO"* 

104 F0RB-1T05* A-B»128 

105 PR INT377*A , HG* < B ) » 395*A , HN* < 8 ) * 31 09*A , HM* < B ) * 

106 NEXTB *G0T034 

107 ' Instrucocs 

108 PR INT31 39 , "0 seu objetivo e lapedir que o navio inisigo, ocu 

pe os quadrantes cos < ) ate chcgar a voce. S* ocupado, voce 

ten que acertar o navio antes que o aesao sude de setor, "i*P0KE 
15572,238 

109 PR INT"po i s do con-trarlo nao havera coao recuperar o quadran 
t*."*PRINTTA8(ll) "Voce tea 3 vidas e 4 niveis para Jogar. Cada t 
iro "* 

110 PRINT"va-lc 10 pontos a seres soaados ou disiniuidos do seu 
escore depen-dendo apenas de sua pontaria e a cada 200 pontos vo 
ce nuda de ni-vel. Apos todos seres ultrapassados, voce persanee 
era no nivel 4 ate ceder ao iniaigo, "» 

111 PR INT"e a cada vez que ultrapassar esse nivel, reccbera uaa 
vida de bonus, ou 50 pontos caso ja possua 3."*PRINTTAB < 11 )"Us* 

< "»CHR*<93)»" > e < "»CHR*<94>»" ) para aover seu canhao, a bar 
ra de espaco para atirar e < "»CHR*<9t)»" >< "»CHR*<92)» 

112 PRINT" ) para abortar o Jogo."*PRINTTAB<21 )"B 0 A S 0 R T E 
!"*PRINTTAB< 18) "Par a continuar < ENTER >"» 

113 A*- INKEY** IFA*< >CHR*< 13) , 1 13ELSERETURN _ 



Ayrton Ribeiro tem 23 a nos, cursou 6 per t'odos de Engenharia El 4- 
trica na AEVA e atualmente tenta o vestibular para Informdtica. £ pro- 
gramador em BASIC, FORTRAN e PASCAL. J4 foi usudrio de um CP- 
200, um CP-300 e um DGT-100, estando agora com um Apple Senior. 



56 



MICRO SISTEMAS. julho/85 







PROGRAMAS PARA CP-400 
COLOR 64-TRS-80 COLOR COMPUTER 



A MICROMAQ, o mais tradicional revendedor de software para a linha TRS-80 
COLOR COMPUTER no Brasil, em conjunto com a MICRO SISTEMAS coloca 
& disposigao dos usudrios o maior catdlogo de programas para esta linha. 




JOGOS OE ACAO EM LINGUAGEM DE MAQUINA 




204 Sanctum: (32K) exorcize o demdno • em ingles. 


25.000 






205 Star Trader - mercador das gaiaxias 


30 000 


101 Cube r (32K) ajude o cuber a entrentar os inimigos enquanto a p<r3m»de muda 




206 Midle Kmdgton - recupere os tesouros na catacumba 


30000 


decor 


20.000 






102 Trapfalt (16K) enfrente as armadilhas (Pitfalls) na caga ao tesouro 


25000 


JOGOS EDUCATIV0S 




103 Jr Reverenge (32K) ajude Jr a salvar seu pai do temvel Luigi 


25.000 






1 04 8-Ball ( 1 6K) para os amantes do jogo de bilhar 


25000 


301 Jogos Educativos (16K)s6nedenove jogos educativos para cnangasde 3 a6anos 




105 Tfcxs (32K) para os amantes do jogo de t6nts 


25000 


abrangendo figuras. letras. nomes, numeros. soma subtragflo e desenhos cdo- 




106 Cynis (Xadrez) (32K) para os amantes do logo de xadrez 


30.000 


ndos 


50 000 


107 Sea Dragon (32K) emogAo e suspense sob as aguas 


20000 


302 Matematica (16K) ensma as quatro operagdes baseas em vanos niveis de 




108 TubarSo (16K) um jogo para quern tern nervos de ago 


20 000 


dificuldades 


30.000 


109 Vegas (32K) smta-se num cassino-caga-niquel. cartas, loto. dados e 21 


20000 


303 MemOna (1 6K) 6 o jogo dassico da memdoa duas figuras iguais 


30.000 


1 10 Pic rue (32K) ajude a fomroga a estocar alimentos 


25000 


304 Figuras Mageas ( 1 6K) associagSo de figuras e cores de seis maneiras diferentes 




1 1 1 Moon Shutle: (32K) destrua o principe das trevas 


25000 


Para criangas de 3 a 6 a nos - manual em inglds 


40000 


112 Zaxxon (32K) enfrente os pengos de uma plataforma espacial para destruir o 




305 Letras Magicas ( 1 6K) ajude o beho-papao a comer as letras cert as Para criangas 




roMZaxxon 


25 000 


de 3 a 6 arms - manual em inglds 


40.000 


1 1 3 Pooyan (32K) defends o seu vale da mvasSo dos lobos 


25000 


306 Numeros Mageos ( 1 6K) ajude o Grover a bnnear com os numeros Para criangas 




1 1 4 Frog: (32K) ajude o sapo a atravessar a rua e o no 


20000 


de 3 a 6 a nos - manual em inglAs 


40.000 


115 JeM: (16K) viva as emogdes do filme Retomo de Jedi 


20000 


307 Correio Eletrdroco ( 1 6K) ajude o Big Bird a entregar as corresponddncias nos luga- 




1 1 6 AndrOide (32K) eltmme os andrtxdes e saia do labinnto 


20.000 


res cert os Para criangas de 3 a 6 anos - manual em mglfis 


40000 


1 1 7 Astro-Blast: (32K) batalha espacial. 




308 Caga as Estretas (1 6K) jogo estratOgco VocA tern que pegar as estrelas no cAu 




1 1 8 Passaros ( 1 6K) elimme os passaros mvasores 




Para criangas com mais de 7 anos - manual em inglAs 


40.000 


1 1 9 Buzzard Bait (32K) ataque os passaros com sua lanpa 


20.000 






120 Candy Ca (32 K) coma doces e vitarmnas para eiimrnar os mimigos. 


25.000 


APLICATIVOS C0MERCIAIS 




121 Cashman (32K) pegue o dinheiro e elimme os gatos (99 telas). 


25.000 






122 Clowns: (32K) fure os baWes saltando na cama elastica 


25.000 


401 WRITTER II: (32K) editor de texto com as seguintes caractensticas linha de ate 




123 Cosmic: (16K) futeboi amencano com naves espaciats 


20.000 


240 carac teres na impressora e 51 colunas na tela Capacidade para imprimir 




1 24 Cpede ( 1 6K) mate a centopeta e a aranha 


20.000 


caracteres portugueses ou simbotos especiats (ate 10) Paginagdo automatca 




125 Demon Seed (32K) destrua passaros, sememes e a nave 


25000 


CentralizagAo automatica Manual em ingles com 90 paginas. 


130000 


126 The King. (32K) salve a pnneesa raptada peto King Kong 


20.000 


402 Elite-Calc: (1 6K) plamlha eletrOnica com as seguintes caractensticas ate 255 b- 




127 Firecopt (32K) apague incdndios e elimme mcendiarios 


20 000 


nhas e colunas Mampula textos numeros operadores matematicos. fungdes trigo- 




128 Doodle Bug (32K) estilo Pacman 


25.000 


nometricas e fungdes estatisticas (maximo, rmntmo. media). Ermte graficos e 




129 Fury. (32K) batalha aerea 


20000 


permite ordenar colunas e linhas Manual em inglfes e portuguAs - 20 p 


90 000 


130 Gallax Attack: (16K) batalha espacial 


20000 


403 Color File: (16K) banco de dados que permite mampular 7 arqutvos prA-defmidos 




131 Gllaxxons (16K) batalha espacial 


20000 


(enderegos. despesas. invest »mentos.„) Voce tambem pode defmiros seus prOpnos 




132 Gobbler (16K) tipo Pacman. 


20 000 


arquivos com campos alfabAteos ou numOrcos. Manual em mgies com 10 




1 33 Grabbier (32K) defenda-se dos immigos em um dupk) labinnto. 


20.000 


paginas 


70.000 


134 Grand Prix (32 K) corrida de carro 


20 000 






135 Kron: (32K) 4 jogos diferentes em um. 


20.000 






1 36 Lunar (32K) venga os obstAculos durante um passeio de Jeep na lua 


25000 


LINGUAGENS 




137 Mudpies (32K) atre tortas e defenda-se dos cozmheiros 


20.000 






138 Pedro: (32K) defenda o jardim dos animais 


20.000 


501 Edtasm: (16K) Unguagem Assembler para o 6809 - Ml 


100.000 


139 Pinball (32K) 


20.000 


502 Forth: (16K) Unguagem Forth para o 6809 - Ml. 


80 000 


140 Polaris: (32K) defenda os submarmos do ataque a6reo 


20000 


503 Logo: (32K) Unguagem educativa logo • Ml 


120 000 


141 Dracoma (32K) salve os pnsioneiros do espago e fuja do dragSo 


25000 


504 Pascal - Unguagem Pascal 


100.000 


142 Bag-Man (32K) roube o ouro e fuja dos mmeiros. 


25.000 






143 Tut s Tomb: (32K) enfrente os pengos de uma cavema em busca do tesouro 


25000 


utilitArios 




144 Willy’s (32K) transpose os numeros de um lado para outro sem ser derrubado 


20000 






145 World’s of Flight (32K) simulador de vto 


30.000 


601 Color Kit (32K) utilitano em Assembler que complementa o Color Basic com mais 




146 Mega Bug (16K) fuja das baratas em um labinnto. 


25000 


de 30 fungdes para fadlitar a programagdo em Basic ou linguagem de maquina. 




147 Bandits (32K) caga ao tesouro em trds mundos diferentes e 300 vanagdes 




Manual em mglAs com 30 paginas 


90 000 


dejogo 


25.000 


602 Stnpper (16K) utilitano que pemiite compactar programas em Basic elirmnando 




148 Poltergeist pegue os objetos para Carol Anne 


25.000 


brancos, comentanos e concatenando linhas 


50 000 


149 Double Back: contome as figuras sem esbarrar 


25.000 


603 Tiny Compiler (1 6K) utilitano que permite compilar a manna dos comandos Basic 




150 Storm Arrows 


25.000 


e extended Basic Manual em mglds. 


90 000 


151 Time Fighter venga os xiirmgos no tune! do tempo 


25.000 


604 Super Screen: ( 1 6K) aumenta o tamanho da tela 0 Color passa a trabalhar com 57 




152 Super Pac II: estilo Pac Man 


25.000 


colunas e 24 linhas. 


50.000 


153 Speed Race corrida de carro 


25.000 


605 Disassembler (16K) disassemblador de programas em linguagem de maquina 


50.000 


154 Fly Tiger 


25.000 


606 Hambug. (1 6K) permite analisar byte a byte qualquer programa Base ou em lin- 




155 Ice Hockey partida de Hockey 


25.000 


guagem de maquina Manual em inglAs 


60000 


1 56 Out House defenda seu dinheiro dos ladrfles 


25000 


607 Banner programagao de letreim 


60 000 


157 Packmaze: estilo Pac Man 


25.000 


609 Cores 9 Editor Assembler 


80000 


158 Pac-Tac estilo Pac Man 


25000 


61 1 Mage Box converte programa de Base TRS 80 pTTRS 80 Color 


90.000 


159 Robatron destrua os robds immigos. 


25000 






160 Tempest 


25.000 


SOFTWARE DE COMUNICAQAO 




161 Protetor aventura espacial 


25.000 






162 Venturer 


25000 


71 1 Color Terminal: (1 6K) software de comuneagdo para o projeto Ciranddo. Amanda e 




163 Defense defenda suas bases 


25000 


Bancos de Dados Particulars T ransmrte e recede arquivos em Basic ou linguagem 




164 Quicx preencha 75% de teia sem ser atingido 


25000 


de maquina BAUD RATE de 1 10 a 9600 em DUPLEX/HALF/FUL/ECHO Ta- 




165 Smurf passao na floresta 


25 000 


manho da palavra 7 ou 8 bits Paridade par. impar ou nenhuma Stop Bits de 1 a 9. 




166 Decathlon 10 provas olimpeas. 


25000 


Manual em ing£s com 30 paginas 


140.000 


167 Color Car corrida de carro 


25.000 






JOGOS DE AVENTURA COM ALTA RESOLUQAO GRAFICA 




N0VIDADES 




201 Calxto (32 K) ajude o arquedlogo (prof. Lagarto) a recuperar o tesouro * 




901 Composer gerador de musea 


80.000 


em mglfes 


25000 


902 Voice: gerador de som 


60.000 


202 Sea-Quest: (32 K) recupere o tesouro perdido - em mg Ids 


25000 


903 New Talk - gerador de som 


80000 


203 Sherman: (32K) encontre o tesouro no fim do arco-iris - em inglds 


25000 


904 Musea 2 - gerador de musea 


90.000 



TABELA 




★ DEDESCONTO 


★ 


at6 65.000 - sem desconto 


de 66.000 at6 1 1 5.000 


5% 


de 11 6.000 at6 165.000 


10% 


de 1 66.000 at6 21 5.000 


15% 


acima de 216.000 


20% 



MICROMAQ 



Desejo receber os seguintes programas pelo(s) qual(is) pagarei a quantia de Cr$ 

PROGRAMAS: 

NOME 

END.: 

CIDADE: UF.: CEP: 

Para tal. estou enviando um cheque nominal A ATI Editora Ltda, Av. Presidente Wilson, 1 65 - Grupo 1210 
Centro.CEP 20.030- Rio de Janeiro -RJ Despesas de Correio incluidas. 

Rua Sete de Setembro. 92 - Lj. 1 06 - Tel: (02 1 ) 222-6088 - R J MICROMAQ 



Sinclair Sinclair Sinclair sine 



Submarinos em Agao 

Frederico dos Santos Liporace 




Jogos, especialmen- 
te os da linha Sinclair, 
sao de dois tipos: inte- 
ligentes (xadrez, ga- 
m3o) ou de a^^o (spa- 
ce invaders, pac-man e 
outros) e, para infeli- 
cidade do usudrio, ra- 
ramente encontramos 
urn programa que reti- 
na essas duas caracte- 
risticas. 

Foi pensando nisso 
que bolei o “Missao 
Atomica Submarina” 
ou “M.A.S”. Comele. 
creio que consegui 
reunir estrat^gia e 
a^ao. 

DIGITACAO 

Devem ser reservadas quatro linhas 
REM para c6digos hex. pois o programa 
utiliza o Assembler quando £ necessdrio 
rapidez. Eis o tamanho de cada um 
deles: 

• linha 1: Bloco 1 - tamanho 224 
bytes. 

• linha 2: bloco 2 - 576 bytes. 

• linha 3 : bloco 3 -320 bytes. 

• linha 4: bloco 4 - 508 bytes. 

Bloco 1 - Contdm vdrias sub-rotinas 

em Assembler que serffo usadas pelo 
programa. Atensffo: apesar de s6 serem 
reservados 224 bytes, voce dard entrada 
com 255 c6digos hex. Isso nao afetara o 
andamento normal do programa, pelo 
contrario. 

Bloco 2 - Guarda dados para formar a 
tela quando se est£ em mar minado. 

Bloco 3 - Executa o jogo quando se 
est4 em mar minado. 

Bloco 4 - Executa o jogo quando se 
est£ no quadrante de um navio inimigo. 

Como em todo programa Assembler, 



todo cuidado 6 pouco na hora de se re- 
servar os espa^os e entrar com c6digos 
hex. 

A listagem BASIC 6 usada quando 
nao d necessaria rapidez. Sobre ela ape- 
nas um comentario: foi usada, sempre 
que possfvel, a fun^o VAL, que econo- 
miza alguns bytes mas reduz a velocida- 
de. Se voce 6 adepto da filosofia “quan- 
to mais rapido melhor”, creio que ela 
possa ser retirada sem maiores conse- 
qiiencias. 

O JOGO 

Depois da apresenta 9 ao o jogo come- 
9 ard. Inicialmente voce tera que destruir 
seis navios, que estao aleatoriamente es- 
palhados pelo oceano com apenas quin- 
ze torpedos dispomveis. 

O oceano i formado por 48 quadran- 
tes (de 1,1 a 8,8) e voce s6 poderd se 
locomover para um quadrante adja- 
cente. 

Voce tern a sua disposi^ao um radar 
que funciona da seguinte maneira: es- 



tando o seu navio no quadrante (4,5), 
o radar ira pesquisar os quadrantes 
(3,5); (5,5); (4,4 )e (4,6) avisando sehou- 
ver navio inimigo num desses sem dizer 
qual. 0 radar tamb^m nSo funciona nos 
quadrantes de borda. 

Em cada quadrante se encontra uma 
das seguintes situates: 
condi^ao branca nenhum inimigo no 
setor. O computador pede novas ordens. 
condigao amarela - mar minado. 0 ini- 
migo espalhou minas explosivas e voce 
tera que se desviar usando as teclas “6“ 
e “7”. Se houver colisao, o jogo acaba, 
senao 300 pontos sao acumulados e o 
jogo continua. 

condigdo vermelha - navio inimigo no 
quadrante. Voce se defrontara e tera 
que destruir o inimigo usando as teclas 
“5” e “8” para locomo^ao e a tecla 
“0“ para disparar um torpedo. O navio 
inimigo surgira no lado esquerdo da tela 
e se deslocara para o outro lado. Voce 
tera que atingi-lo antes que ele chegue 
ao lado direito, caso contrario o jogo 
termina. Se o navio for atingido, 1000 
pontos sao acumulados e o jogo con- 
tinua. 

O jogo termina quando voce conseguir 
destruir todos os navios inimigos ou ser 
destrui'do. No primeiro caso, o jogo e 
reiniciado e os pontos acumulados. 
Boa sorte!! 

Obs.: os bloc os 2, 3 e 4 nao estao preen - 
cliidos em sua totalidade, mas e necessa- 
rio que se reservem os bytes designados 
em tamanho”, pois ser£o usadas instru- 
9 des do tipo “CALL” e “JUMP-JP”. 



Frederico dos Santos Liporace estuda no 
Col6gio Sao Jos 6, no Rio de Janeiro. Possui 
um TK-85 e desenvolve programas em 
BASIC e Assembler. 
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PflND U5R UAL " 165 Id 
RAND U5P UAL " 1 653S 
PRINT RT 2 16 ^ 

F OR 1 = 16 TO 2 STEP 
PRINT AT 2.1. WBM 

NEXT I 

PRINT AT 2 13 ; 51^ 

PRINT AT 5 2 'mi TP 

LET h$= 99BBCN- 

PRINT AT 54, 

GOSUB UAL 400 " 
PRINT Tfi = o. 

■■■Bi 

G05UB .AL "400" 
PRINT t hM_ 

GOSUE UAL "400" 

GOTO 420 

FOP 1=1 TQ LEN Ai 
PRINT AS > I) . 

NEXT I 

RETURN 

PRINT AT 10.2 



1045 G05UB UAL "7000 " • 

1050 GOTO UAL 1035" 

5000 FOP 1=1 TO 10 

5005 PRINT AT 622.CS AT 6,22, 3 



425 IF INKE-S '" THEN GOTO 450 
430 PRINT AT 5 2 "M" . TAB 2. A 
TAB 2. "S" 

435 PRINT AT 10,2 - PRESS IONE 

UMA TEC LA ' 

440 PRINT AT 5 , 2 , 2 TAB. 2, 3 
TAB 2 "S' 

445 GOTO 420 

500 P'PINT AT 20.2 - HAPA SEnD 

0 DESENHADO 
600 — ET SCORE =UAL O' 

■305 LET TOTAl sVAL 'O' 

510 POKE UAl 16730 , UAL 40" 

315 LET C=UAL 5" 

820 ^E^ T =UAL 20 

825 =OKE '.'Ai. 176 56 T t ; 

330 POKE UAl 17659 UAl "3 
200 •ET D = PEEK 16396 +256 *PEEf 
16 39"' • +1 
910 DIM fi s 3,6; 

915 FOR 1=1 TO C 

916 PAND 

920 lE t 0=INT (RND*5) +1 

225 ^ET P = I NT >RND*7)+1 

230 IF MS iP . 0 i = " + " T M£N GOTO 92 

0 

935 LET m$ . p O' = "* ' 

240 NEXT I 
245 FOR 1=1 tq 5 
250 LET Q = i NT ' PND *5 1 +1 
255 LET ij = InT (RND*" +1 
960 IF MS (U.Q '="*" OP M 5 ( U . 0 i = 
4" then GOTO 950 
965 LET m$ u . 0 s =" +" 

370 NEXT I 

1000 PAND USR UAL '16514 

1001 LET CS= BRANCA" 

1002 lET P=D +69 

1005 PAND U5P UAl "16535 

1006 LET U=UAL 1" 

1010 GOSUB .AL 3000 
1020 DIM P l2 1 

1025 LET P (1) =1 
1030 lET P .2* =1 

1035 PRINT AT 2 21, Pill, AT 2,23: 
P ( 2 J , AT 4 ,22; C, AT 11.13.T 

1036 GOSUB 8800 

1037 IF CS=UEPHELHA THEN GOSUE 
UAL 5000 

1039 PRINT AT 6 22 . 



■ 1 . p 1 1 ,i . AT 2 , t 



L041 IF u = 1 THEN GOSUE UAL "5300 



5010 NEXT I 

5011 POKE R ,UR^^68"^^^^ 

5016 PPINT*AT 15,2; 

5020 GOSUB UAL "400" 

5031 PRINT RT 16.2. 

5035 LET m$= 'K931 
5040 GOSUB UAL "400" 

5055 FOP 1=1 TO 20 

5060 P RINT a- 16,4 COMBATE " 

5065 NEXT^^ ^ 



5075 G05UB UAL 3950 
5030 PAND USR UAL ”17663" 

5035 IF PEEK UAL ' 17660" =1 THEN 
GOTO .'AL "6200 

5036 LET C=C-1 

5037 LET TOTAL sTOTAL+UAL "1" 

5038 IF C=0 THEN GOTO UAL 5500 
5090 GOSUB UAL '5200 

5095 LET TsPEEK UAL ‘ 17655"-! 
5100 LET SCO PE =5 CORE + UAL 1000 
5105 w£'i i| —111 



5110 PRINT AT 5,1. 

5115 GOSUB UAL 400” 

5130 PRINT C 
5135 LET Z=P >1' 

5140 LET X =P ( 2 / 

5141 uET MS *Z . X) =" " 

5145 FOP 1=1 TO 10 
5150 NEXT I 

5155 GOTO UAl '5140" 

5200 LET KsPEEK UAL 16730" 
5205 IF K < 1 THEN RETURN 
5210 LET K. =K -UAL "3" 

5215 IF K. 1 THEN LET K =1 



5220 POKE UAl 



_ _ _ H RGcNCIR HMERICn| 

IN A C. I. A. Informa oue SSU 51 

Lsmarino hlslear cumpriu 

Bn perfcicro - nis^rc e de 

I5IGNA c HESHO P UHA *13 3| 

HA IS P£P IGC 5 A , 



5505 PRINT AT 8,1; 
5510 GOSUE UAL 400 " 
5525 PRINT SCORE Mi 
5530 LET C =10 
5535 LET T =UAL 15" 
5540 POKE UAL 16730" 
5545 POKE UAl 17656 
5550 PRINT AT 18.1: "1 



5001 PRINT AT 19,2.' 



6002 LET CS= AMARELA" 

6003 e 0P 1=1 TO 10 

6004 P RINT AT 6,22, C$ AT 6.22, 



6003 POKE P . CODE 'Si' 

6009 GOSUB 400 

6020 FOP 1=1 TO 20 

6025 PR INT AT 19 ,20. "MINADO" AT 

19.20. "QBBfi ' 

6030 NEXT I 

6040 PRINT A~ r 21 . 2 . 



6045 FOP 1=1 to 2 
6050 GOSUB UAL 3950" 

5055 NEXT I 

6060 POKE UAL "16523".0 
6065 LET L=U3P UAL "16514" 

60^0 POKE UAL 16523". 123 
6075 LET L=U3P UAL 16532 
6030 LET l=U5P UAL 17326" 

6085 IF PEEK UAL "16720" =1 THEN 

GOTO UAL "620C 

5090 FT A i= •=J rT:f =|-f42aW7T=«=frT «g , *ii'IT: 

6091 ,£T = C 0 P E =5 1 0 P 1 E + UAL "300 
6095 PRINT AT 8,1. 

6100 GOSUB UAL ' 400" 

6121 GOSUB UAL 3950 

5125 LET 0=PEEK UAL "16730" 

6130 uET 0=0-2 

6131 IF O'. 1 THEN LET 0 = 1 
6135 POKE 16730,0 

6140 LET C$= BRANCA" 

6145 i_ET U =U5P UAL 16514 
6150 LET L =USR UAL "16535" 

6155 GOSUB URL 3000" 

6156 PRINT AT 2 21.Pll.AT 2.23. 
P(2):AT 4.22, C: AT 11.13.T 

6130 RETURN 

61-35 GOTO UAl ^005" 

6200 FOP 1=1 TQ 20 
6205 POKE 16619,1 
6210 LET L =USR 16613 
6215 NEXT I 

6220 POKE UAl 16619' 30 

6225 LET L=US P .'AL "165 I S" 

52 30 LET A<= 



6236 PRINT AT 8,1. 

6240 GOSUB UAL 400" 

5255 PRINT TOTAL^^^^^^^ 

6256 PRINT $ AT 12,1, 

6270 GOSUB UAL 400" 

6235 PRINT SCORE 

5290 IF INKEY S=" THEN GOTO UAL 
"6290" 

6295 GOTO UAL "300 
7000 GOSUB UAL "3500 



6005 NEXT I 

6006 PRINT AT 19,2, 

6007 LET U =0 



7003 IF INKEy $ = " THEN GOTO UAl 
7090" 

7005 IF INKEY $ = 3" THEN GOTO UAL 
"7100 

7010 IF INKEYS = '7** THEN GOTO UAL 
"7200" 

7015 IF INKEY S= 6" THEN GOTO UAL 
"7300 

7020 IF INKEy S= 5" THEN GOTO UAL 
"7400 " 

7090 PRINT AT 21.2.' 3UA5 OR DEN 

° " . at 21.2 

7091 IF PEEK P=0 THEN GOTO 7095 
7093 POKE P.0 

7095 GOTO UAL "7003" 

7096 POKE P.3 

7093 GOTO UAl "7003" 

7100 IF PEEK (P + 1) < >0 THEN PETIJP 
N 

7105 POKE P,0 



THEN GOTO UAL 
THEN GOTO UAL 



THEN GOTO UAL 
. " > SUA5 ORDEN 



AGORA EM PORTUGUES ! 

UT I L I TAR I OS MAI £» FAMOSOS 
DA LI NHA ADDLE - - 




POTENCIAL SOFTWARE 



Cl DOS BOSS - SOI 70S Dl CORAEDOE DE DISCO. 

CJ ALPHA PLOT • UTILITAE10 CIA P I C O/TII TO . 

Cl PKOHTO DOS - TtIPLICA A VBLOCIOADE DB ACBSSO Dl A«- 
QUIYOS RORRAIS 00 B1SAS108. 

Cl TIP 0ISKR1 - 100 DICAS DB PBOCB Ail AC 40 VI OR DISCO. 
CJ PLBX TBIT - CSKA TO COLOHAS D6 TIXTO SER A0X1L10 - 
DB HABDMABB. 

CJ TYPEFACES - 26 FORTES DB LETKAS B HORBKOS KR ALTA* 
BBSOLOCAO GBAFICA. 

Cl APPLE RBCKAHIC • OTILITAIIO DE SHAPE TASLI/STTB ZAP 
C) BE AC L E SASIC - < 64E 1 OR 008 RAIS PB0F18SX0MAL PABA 
SBO APPLB CORPATIYBL. 

C) CPLE - EDITOB OB LIBHA8 BAPIOO P/PSOCSAKAS ER BASIC 



Cl PASSO A PASSO I - COBSO ISTBODOTOBIO DB BASIC 

C 3 PASSO A PASSO II - COKSO SOPLCRSHTAB DB SASIC 

C 3 PASSO A PASSO III - COSSO ACTTO- D I DAT I C O OS DOS 

Cl 80PSBCSAF ICO - HD 1 TO* /H OH T A DO H OB CSAFICOS. 

CS ACBSOA - PBOCBAXA PABA RABCAB CORPBORISSO 
C 3 H D I TOR OB TBXTO - CASTAS, BBL ATOB 10, TABBL AS ( BTC 
C) RALA DISBTA - CADASTBO E CRI8SA0 DE ETIQOCTAS 
C 3 BANCO OE OADOS - FOBROLA ABQOITOB 01 VERSOS 
C) ROSICA - C0RP0S1CA0/ IRPSESBAO/PAOTAS/EXBC VC AO 
Cl COSTA COIR. SARC 08 - C OB TSOL A/ER I TE H X TS AT 08 
Cl CORRECT - C OH CJ R I C AC AO RICKO/RICBO ER CP/R 

•• PSOCSAJIAS APL ICATIYOS C0RSBC1AS •• 
CJ POLHA PC TO/ COST AS . CEB AL/ COST AS BSC/PAC 



A8SINALE O PROGRArtA K ENV I I 
COM CHEQUE HOPIIMAL PARA • 

1X0 BOB POTHMCIAL CQH.LTDA 
CJC ^77 - CHP 13100 

CAMPINAS — BY* 



GRATIS < T ABELA DE PI 

POTEBCIAL SOFTWARE 
R. JOSE V I LACEL IM JR « CM 2 — 
FONE < 01 «P£P> P 3 - A 3 *>a 



CAMBUI 




SUBMARINOS EM AQAO 



7110 

7115 

7120 

7125 

7155 

7200 

RN 

7205 

7210 

7215 

7220 

7225 

7300 

RN 

7305 

7310 

7315 

7320 

7325 

74.00 

N 

7405 

7410 

7415 

7420 

7425 

3000 

8005 

TAB 



LET R=R + 1 
LET P( 1) =P(1> +1 
POKE R ,8 
RETURN 

G05UB URL '8000 

IF PEEK (R-33) < >0 THEN RET’J 

POKE R , 0 
LET R =R-33 
LET P (2» =P (2) -1 
POKE R , 8 
RETURN 

IF PEEK IR+33) <>0 THEN RETU 

POKE R , 0 
LET P =P+33 
LET P (2) =P (2) +1 
POKE R , 3 
RETUPN 

IF PEEK (R-l) < >0 THEN RETuR 

POKE R , 0 

LET RsR-1 

LET P(l) *P (1) -1 

POKE R , 3 

PETURN 

LET As = 

PRINT AT 2,2. -0 AS T AE 2 
S TAB 2 g AS ‘'"AE 2 S A§ 
“ as TAB 2 3 aj TAB 3 




3020 LET A$= 

3025 PRINT AT' 

■ TAB 17, AS, TAB 17, AS, TAB 17, AS 
• T hE 17. AT 14 15 



3100 

3500 

3501 
3505 

3510 

3511 

3515 

3516 
3520 
0 UAL 
3525 
0 UAL 
3530 
0 UAL 
3535 
0 UAl 



RETURN 
LET Z = 
LET U 
LET X = 

I p 2 = 1 

z«a 

I* X = 1 
IP N = f 
IF ns 
3580 
:f ns 
3530 

if rift 
5 : 0 
IF HS 
•8580 



P (1) 

UAL 1” 

P (2.< 

THEN GOTO 
THEN GOTO 
THEN GOTO 
THEN GOTO 

Z, CX + l) ) =" 
<Z + i) ,X) S‘* 
' Z - 1 ) ,X> =■* 
AT 19,2, 






8531 
■3 5 3 ; 

■3590 

3700 

3300 

8301 

3803 

20 

3304 

00 

8805 
B 18 



PRINT AT 19.2. 

RETURN 
RRINT AT 19 . 2 . 

RETURN 
PETURN 
LET Z=P m 
LET X =P ( 2 ) 

IF MS <Z j X) =" 

IF MS <Z , X) =" h 




PRINT AT 9,18, 

K .TAB IS, 



THEN GOTO 53 
THEN GOTO 60 
TA 



UAl -oSSE ' 
UAL 6535 
UAl -8535 
UAl 3535 
*” THEN GOT 

THEN GOT 

*- THEN GOT 

THEN GOT 



8810 PRINT AT 17 , 17 , 

LET C S = “ UEPMELHA ” 
RETURN 

PRINT 

■■I 




PRINT AT 17 , 17, 



3325 RETURN 

8950 p OP J =1 TO 20 

3955 NEXT J 

8960 RETURN 

8965 5AUE ma§ 

3970 GOTO UAL t, :300' 



Listagem BASIC 



Bloco 1 

— enderepos de 16514 a 16738 
— tamanho: 224 Bytes. 
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40 


36 
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06 


IE 
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10 
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FB 


35 


31 
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12 
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0C 


16585 


40 
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C7 


00 


19 


11 


66 


41 


16594 


06 


20 


F5 


1A 


77 


13 


23 


10 


16602 


FA 


23 


FI 


3D 


FE 


00 


CS 


C3 


16610 


D2 


40 


3h 


6 F 


65 


10 


FE 


C9 


16615 
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IE 


ED 


47 


C9 


36 


30 


23 


16626 


36 
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23 
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36 


30 


16634 


23 


36 
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11 


23 
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00 


16642 


ED 


52 
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80 
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•36 


30 


C9 


16650 


60 


69 


36 
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23 
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36 
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16565 
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00 


ED 


52 
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34 
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05 
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ED 
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FE 
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00 
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16714 


01 


C9 


DF 


64 


1C 


1C 


00 
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41 


06 


FF 


16730 

16733 


23 
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FE 
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FE 


00 


C3 


C3 
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Bloco 2 

— endere^os de 16744 a 17319 
— tamanho: 576 Bytes. 
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16752 
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os 


05 


16760 


08 
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16766 
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03 
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16776 


30 


80 


30 


50 


30 


50 
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30 


1673 4 
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50 


30 
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30 


16792 
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50 


30 
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80 
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50 
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30 
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SO 
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30 
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50 
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50 


16315 


30 
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30 
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50 
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16832 


30 


60 
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30 
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50 


16356 


30 
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50 


97 


50 


30 


30 


16364 


30 


30 


30 


80 


80 


80 


30 


50 


16372 


30 


60 


50 


50 


30 


30 


30 


30 


16380 


97 


50 


30 


80 


30 


30 


30 


50 


16383 


30 


30 


50 


30 


80 


50 


30 


80 


16895 


30 


80 


80 


50 


60 


30 


50 


30 


16904 


30 


97 
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50 


30 


80 
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16912 
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SO 
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97 
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Bloco 3 

— endere^os de 17326 a 17645 
— tamanho: 320 Bytes. 
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17582 BA 44 2B 7E FE 80 C2 Bh 
17590 44 3E 00 C 9 3E 01 C9 3E 
17593 01 C9 C2 CD 44 23 7E fe 
17505 30 C2 CD 44 3E 00 C9 3E 
17614 01 C9 3E 01 C9 1C 1C 1C 



Bloco 4 

— enderepos de 17652 a 18160 
— tamanho: 508 Bytes. 
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E preciso muito investimento em 
pesquisas para alcangar a tecnologia 
da Verbatim. 

O mundo todo sabe e usa seus 
produtos, porque confia na qualidade 
e no desempenho 100% livre de erros 
dos disquetes, testados um a um e 
unicos a excederem as normas padrao. 
Com as fitas magneticas Verbatim, 



o mesmo padrao tecnologico e exigido, 
mantendo assim, um desempenho 
muito acima da concorrencia. Sao as 
unicas com garantia total de 5 anos, 
contra qualquer defeito de fabricagao. 
Junte-se todas essas vantagens e, 
tenha em maos, os produtos mais 
perfeitos, produzidos no Brasil pelo 
maior fabricante mundial de disquetes. 



JJ Verbatim 



Central de Informagdes Verbatim 

Na Grande Sdo Paulo, disque 072-3418 

Para as demais cidades do pais, disque (Oil) 800-34 1 8 

Voce esclarece qualquer duvida. conhece nossa rede de 

distnbuidores e nao paga a hgagdo 








Um centra de suprimentos com atendimento tao 
preciso quanto a qualidade dos seus produtos. 







O "PACOTAO" OFERECEt 
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Micros 

Q * Software 

* Assistencia 
t^cnica 
IBM/PC, 
XT e AT 
Suprimentos 

Acess6rios 
perifericos 



•o^ sV 



re^° 



SS° 
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^DAiATOAD 

Rua Luiz Go6s, 1 894 — Sao Paulo 
CEP 04043 - Telex: (Oil) 37755 DTRD 



O usuario de micros, 
principalmente aquele que tem o 
seu em casa, alem de conviver com 
o equipamento na escola ou no 
escritorio, vira e mexe se ve diante 
de problemas com a assistencia 
tecnica, dificuldade em encontrar 
cabos e conectores e demora na 
entrega de pegas de reposigao, etc... 

Nao e dificil tambem encontrarmos 
usuarios que se ressentem de 
melhores informagoes sobre onde 
encontrar o que precisam, seja a 
oficina autorizada para o seu micro, 
seja a loja onde comprar a fita 
indicada para o seu caso. 

Cientes disso, a equipe, de MS 
resolveu que ja estava na hora de 
prestar mais um servigo, atingindo 
ao mesmo tempo os dois lados da 
questao. 
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, 1T _, ^ • Formularios Interprint 

• Etiquetas Jac Tab 

S3 • Fitas Impressoras 

• Disquetes de 5% " e 8" 



05413 RUA LISBOA. 502 TELS.: (Oil) “ 

64.0519 

ENTREPOSTO TOTAL DE SUPRIMENTOS PARA INFORMATICA 



QUAL 

A INTERFACE 
QUEESTA 
FALTANDO 
NO SEU MICRO? 



DELTA SOFT 
MICROINFORMATICA LTDA. 

Al. Lorena, 51 6 — CEP 01 424 

Tel. 283.3544/ 284.5516 

Cx. Postal 18708 — Sao Paulo — SP. 



E aquela que ihe devolvera 
o orazer de ficar em frente do seu 
monitor por tempo ilimitado. 

MICROTELA possibilita que voce 
continue com seu TV. filtrando e 
eliminando os reflexos. ao mesmo 
tempo que auinenta a resoiug^o da 
imagem. 

Fornecemos tambem 
)A. suporte exclusivopara 

4 momtores. Consulte-nos. 











Se o assunto 6 Inform&tica... 


em Fortaleza procure a Telemicro 


• comercializagao de micros 


• componentes eletronicos 


• assistencia tecnica 


• programas comerciais 


autorizada 


• desenvolvimento 


• perifericos 


de sistemas 


• suprimentos 


• estabilizadcres 


• interface e placas 


• modens 


. . 


Rua Cesfdio de Albuquerque, 657 


* 1 TClCmiCM Cidadedos Funcion£rios 




Tel.: (085) 239.3819 — CEP 60.000 


>N*0*MAT>C« COM«*ClO 1 |NC(NM«a«A IT DA 


Fortaleza — CE. 



Estamos langando, a partir desta 
edigao, o nosso CADERNO DE 
SUPRIMENTOS E ACESSORIOS 
que, assim, esta abrindo um espago 
nunca antes dedicado aos 
fornecedores desses pequenos 
instrumentos indispensaveis ao 
bom funcionamento do seu micro 
— e que representa um segmento 
importante do mercado de 
imformatica — , e a voce leitor, que 
agora nao precisa mais cogar a 
cabega toda vez que seu 
equipamento “pifar”. 

Consulte o “CADERNO DE 
SUPRIMENTOS E ACESSORIOS 
MS e voce vai saber onde encontrar 
a assistencia tecnica autorizada 
para o seu equipamento e onde 
comprar as fitas, disquetes, cabos, 
papel, etc. 
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£ £ Comercio e Representacoes Ltda. 

PRODUTOS E SERVIQ05 PARA PRCCES. DE DADOS 

Discos * Fitas magneticas * Disketes 
* Fitas Inpressoras * Pastas * 
Etiquetas * Pormulario * Manutengao 
e recuperagao em discos magneticos. 



Voce escolhe seu fornecedor 
pelo prego? 

Pelo atendimento ou pelo prazo 

de entrega? 

Reuna todos os (tens e 

escolha o melhor 

datamidia 

suprimentos 

• disquetes • fitas impressoras 

• pastas *etiquetas 
• arquivos para disquetes 

• disquetes • fitas magneticas 

• formularios 

DISCOS MAGNETICOS MARCA 



CONTRPL DATA 



datamidia 



> SAO PAULO (01 1 ) 572. 1 1 1 8 

> RIBEIRAO PRETO (016)625.1571 
■ RIO DE JANEIRO (021) 262.9458 






Suprimentos Prodata 
uma boa impressao do que foi gravado 




© PRO D Al A Rua Henrique Ongari, 103 
CEP 05038 — S. Paulo — Tels.: 864-8599 (llnha tronco) 
Representantes: 

Riode Janeiro: tone - 253.3481/Belo Horizonte: tones 225.9871 e 

225.4235/ Curitiba: tones 263.3224, 262.8632 

Porto Alegre: tones 26.6063 e 26.1319/ Recite: tone 227.2969. 



kv. Fagundos Fllhio, 745 
Jabaquara 



Fone: 579-7218 
Sao Paulo - SP 
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Veja aqui uma interessante aplicagao do 
programa “Codigo Morse a moda Sinclair” e 
descubra como usar seu micro para fazer... 

CW sem gastar 
muito Q$J 

Erwin Hubsch Neto-PY2RNJ 



A pos algumas horas de utiliza^ao, com grande suces- 
so, do programa “Codigo Morse a moda Sinclair”, 
publicado em MS n9 40, ocorreu-me a ideia de usd- 
lo para manipular diretamente o transmissor atraves 
de meu TK 85, transformando-o em um eficiente — e economi- 
co — “keyboard”. O primeiro passo foi realizar medipoes nas 
pistas da saida de expansdo do micro, o que me levou a desco- 
brir uma varia^do de sinal de I.OV (sem carater emitido) para 
1 .5V (durante a emissdo de um cardter) na 8^ pista da direita 
para a esquerda, olhando-se o micro pela parte traseira (figura 
1 ); a partir daf bastou polarizar um transistor de uso geral que, 
por sua vez, controla um rele, cujos contatos irdo manipular o 
transmissor ou um oscilador de audio. 

O circuito de nossa pequena interface e sua lista de material 
estdo na figura 2. Como se pode observar, e de grande simpli- 
cidade e a montagem poderd ser feita em forma de “aranha”, 
em um peda^o de placa-padrao filetada, como no meu proto- 
tipo, ou, para os mais sofisticados, em uma plaquinha de cir- 
cuito impresso especialmente confeccionada. Aos que o soli- 
citarem, terei prazer em fornecer o esquema de adapta^o da 
placa-padrdo por mim utilizado. 




^^MicroLl 



Para sua maior comodidade. a ATI Editora Ltda. coloca d sua disposipao 
os seguintes enderepos de seus representantes autorizados 




RIO DE JANEIRO 

ATI Editora Ltda. 

Av. Presidente Wilson. 165 - Gr. 1210 
CEP 20030 - Tel: 262 6306 



PORTO ALEGRE SALVADOR BELO HORIZONTE 

Aurora Assessoria Empresarial Ltda. Marcio Augusto das Neves Viana Maria Fernanda G. Andrade 

Rua Uruguai. 35 - sala 622 Rua Saldanha da Gama. 06/1° andar Caixa Postal 1687 

CEP 90000 - Tel: (0512) 26-0839 CEP 40000 - Tel: (071) 242 6393 Tel: (031) 335 6645 





Figura 2 
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Lista de materials: 

TRl - Transistor de uso geral NPN 
(BC238, BC548 ou equivalente) . 

D1 Diodo red fica dor comum 
(1N4001 ou equivalente). 

RL 1 - Micro-rele para o Vcc 
(Christian-Zettler AZ 802-2C-6D ou 
equivalente). 

R I - Resistor 270 Ohms l f4 Watt. 

J1 - Jaque mono comum para 
ligagao do plugue da fonte. 

PI - Plugue mono comum para 
ligagao a entrada 9 V DC do TK 85. 

P2 - Plugue mono comum conforme 
entrada de manipulador do 
transceptor ou oscilador de CW. 

Diver sos - P la quin ha de circuito 
impresso padrdo, fios, 
soldo conector para ligagao 
no 89 filete da expansdo. 



A conexfo da interface ao micro e feita em sua parte tra- 
seira no “pente” para conexao da expansdo, utilizando-se so- 
mente a 8? pista, a contar da direita para a esquerda, conforme 
mostrado na figura 3. Nesta mesma figura pode-se ver como e 
feita a ligado a fonte de alimenta^ao, utilizando-se a propria 
fonte do TK: o plugue PI devera ser ligado na entrada de ali- 
menta^o do computador, e o plugue proveniente da fonte 
devera ser conectado ao jaque J1 , montado na propria placa 
do circuito. 



Apos terminada a montagem, conecte o circuito ao 8? ter- 
minal do “pente” da expansffo. Tal conexao pode ser feita 
usando um conector apropriado para ligagao a placas de circui- 
to impresso, ou ate mesmo uma pequena garra jacare. 

Feito isto, carregue o programa no micro, e nao se preocupe 
se o rele vibrar durante o carregamento. Apos carregado, teste- 
o escolhendo a velocidade 60 e o modo 3 (automatico). Na sai'- 
da dos contatos do rele (plugue P2), voce podera ligar um osci- 
lador de audio para pratica de CW ou o seu proprio transcep- 



A interface de CW RENSI RS 1050/A 




p6s um respeitdvel QRX 
(SRI. . .), ocasionado pela 
virada do ano, finalmente a 
RODADA MS tern a satisfagao de 
divulgar o result ado dos testes rea - 
lizados com a interface de trans - 
missdo /recepgao de CW RS 1050/ 
A, da Rensi Eletronica Digital 
L tda (Caixa Postal 666 1 , CEP . 
01051, Sao Paulo-SP), gentilmen- 
te cedida pelos sens titulares, PY2 
EMl-Renato e PY2 AIM-Sin4sio, 
para apreciagdo e posterior sorteio 
entre os nossos leitores. 

A boa impressdo comeg a na 
ocasido do recebimento: muito 
bem embalado, o material 6 cons - 
tituldo da interface propriamente 
dita, de uma fita contendo o soft - 
ware necessdrio e de um manual 
de instrugoes que, embora de 
apresentacdo has tan re simples, 4 
tao de tornado (ao contrdrio da 
maioria dos manuals de equipa- 
mentos de informdtica) que nao 
deixa qualquer duvida ao usudrio 
mddio. 

A interface RS 1050/A, com - 
patlvel com praticamente todos 
os equipamentos da l in ha Sinclair 
disponlveis no mercado nacional, 
d de factlima instalagdo, bastando 
encaixd-la no conector de expan- 
sdo do micro - no caso dos TK 
82/83, ZX81 e NEZ 8000, a in- 
terface serd conectada entre o mi- 
cro e a expansdo, de uso obrigatd- 
rio, pois o programa exige um mi - 
nimo de 8 K. Suas principals ca- 
racteristicas sao: velocidades de 
10 a 40 ppm na recepgao (a juste 
automdtico) e de 10 a 50 ppm na 
transmissdo (a juste por software), 
10 memdrias de atd 255 carac te- 



res cada uma e sinais especiais 
AR-SK-AS-KN e BT, nao exigin - 
do qualquer alteragdo ou adapta- 
gdo no seu micro. A interface dis- 
poe ainda de um LED para a cali - 
bragao. um a juste do tom de au- 
dio e dois jaques, um para rece - 
ber o sinal de audio do receptor 
(RCVR) e outro para ser ligado 
d entrada de manipulador do trans - 
missor (XMIT). Todas as precau- 
goes relativas a realimentagdo ou 
retomo de RF, que poderiam vir 
a prejudicar o juncionamento, sao 
corretamente observadas no ma- 
nual. 

A utilizagao 6 tao simples 
quanto a instalagdo : apds ser car- 



regado o programa entra imedia- 
tamente em execugao, dividindo 
a tela em duas partes, separadas 
por um sinal de menor em video 
inverso (que indica o modo de 
recepgao ). A parte superior 4 des- 
tinada aos sinais recebidos e a in- 
ferior aos sinais transmitidos, e 
ambas possuem 10 linhas, com 
SCROLL automdtico , durante a 
transmissdo, cujo modo 4 indica- 
do por um sinal de maior em vi- 
deo inverso, os carac teres vao se 
trans forma ndo em video inverso 
conforme forem sendo transmits 
dos. Toda a operagdo 4 controla- 
da por um menu, cujos comandos, 
de fdcil memorizagdo, estdo muito 



bem explicados no manual. 

Durante a prova de estrada”, 
ou seja, os testes nas faixas, o 
comportamento foi exemplar, 
sempre recebendo elogios dos co- 
legas e sem apresentar quaisquer 
problemas. Como acontece com 
qualquer equipamento de recep- 
gdo automdtico, foi notada uma 

certa dificuldade na recepgdo de 
sinais fracos ou sujeitos a QRM, 
bem como na discriminagao entre 
dois sinais muito prdximos e de 
intensidades semelhantes, o que 
pode ser contomado sabendo-se 
explorar os recursos do receptor 
ou atrav4s de um bom filtro dt 
audio, do tipo Rcaltom. O que e 
virtualmente imposslvel - e isto 
tamb4m acontece com qualquer 

equipamento, mesmo os mais so- 
fisticados - 4 a recepgdo dos si- 
nais dos tl munhecas duras’\ nor- 
malmente iniciantes no CW ou, de 
modo geral, da manipulagao ma- 
nual, ndo -eletronica (batedor de 
cabegote), em que as relagoes 
ponto-trago-espago ndo sdo obe- 
decidas. Em resumo, interessa mui- 
to mais a cadencia do que a inten- 
sidade do sinal. Quando o QSO 4 
entre duas ,l mdquinas , \ a! entdo 
4 que se pode avaliar toda a po - 
tencialidade dessa interface. 

Estdo de parab4ns o Rena to e 
o Sin4sio, pela ousadia de desbra - 
var o mercado e pela qualidade de 
seu produto. Agradecemos a cola- 
boragdo de PY2AQO-Luiz, PY2 
DRD-Rodrigues e PY2EGY-Belso, 
cujos comentdrios foram de gran- 
de valia . 
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RODADA MS 



PAINEL TRASEIRO DO T K8 5 



Conector liqado ao 8 ? filete 
(da direita para esquerda) 




Figura 3 

tor. Tenho j £ varios e vdrios QSO assim realizados, nas mais di- 
versas velocidades, sem nunca ter encontrado nenhum proble- 
ma. 

Para aqueles que, como eu, n 2 o se sentiram satisfeitos com 
a mi qualidade do som obtido atraves da W ou em um rddio 
de FM, o oscilador de audio da figura 4 e a dica do som perfei- 
to: use-o para aprender CW, ou como monitor em aulas de CW 
no seu clube, por exemplo. 




A partir daqui, o unico problema que surge ao se utilizar 
este programa 6 a falta dos sinais de pontua^o normalmente 
utilizados nos QSO de radioamadores. Creio que o programa 
possa ser facilmente modificado para incluir tais sinais, mas 
permito-me deixar tal modifica^^o a cargo de outro leitor da 
RODADA MS. Quern se habilita? 

Vi o mais rapidamente possivel para as faixas e nao esque- 
9 a de dizer a todos que esta operando via computador - se nao 
o fizer, muitos colegas acostumados a sua “munheca dura”, 
ao ouvirem aquela QSD “redondinha”, v 2 o pensar que existe 
um clandestino operando com o seu indicativo... 



De PY1DWM 



O trabalho publicado nesta edifdo, de PY2RNJ-Erwin, 4 
uma interessante aplicagdo do programa Codigo Morse a 
Moda Sinclair (Ms n 9 35), do Jorge A. C. Bettencourt Soares, 
para que o seu micro possa manipular um transmissor atravis de 
uma pequena interface, e constitui um exemplo de concretizagdo 
de um dos mais caros objetivos da RODADA MS: a realimenta - 
qdo, ou efeito multiplicador , ou seja, modificagdes e/ou adapt a - 
foes de trabalhos jd publicados, ampliando a sua gama de utiliza- 
fdo e o nosso elenco de colaboradores. 

Correspondence recebida: de PY31T-Pivatto, PY3ASD-Mu- 
rillo. PT7 VCH-Aquino: BI do CWRJ, Bl do CWRL, O Jomal do 
Radioamador, drgao da LABRE DS/RJ; de PY5CIG-Alcione, colo- 
cando a disposifao dos leitores os programas Arquivo de Comu- 
nicados e DXCC Cibcrnetico compilados (em formato /CMD) 
atravis do ZBASfC, e de cxecufdo muito mais rdpida; dePYSA D V/ 
1 -Armando, reportando a construfdo e a medifdo em bancada de 
bobinas de antena calculadas pelo Antena Dipolo Encurtada 
(MS n? 38J, de PY2AQO, com resultados surpreendentemente 
exatos - j 5.4 microH medidos contra 36.0 calculados / Ganhei 
de presente do Luiz uma antena dipolo encurtada para 80m, 
prontinha - foi sd ligd-la junto com meu dipolo normal de 40m, 
formando um “bigode-de-gato" e sair ganhando as mais FB re - 
portagens. Re porta ainda o Armando ter convert ido o programa 
do Luiz para micros da l inha APPLE, estando a disposifdo dos 
interessados. Os sinceros agradecimentos da RODADA MS e os 
para bins ao Luiz e ao Armando. 

Vejam (finalmentel) nesta seqdo as observaqoes acerca da in- 
terface para transmissao jrecepfdo de CW RS 1050/A, da RENSI 
ELETRONICA DIGITAL, gentilmente cedida por PY2EM1 -Re- 
nat o e PY2AIM -Sinisio , para apreciagdo e sorteio entre os nossos 
leitores: aguardem sensacional promofdo para o sorteio. Em QSO 
recente, o Sinisio pediu-me para que divulgasse o prdximo lan- 
f amen to da interface de RTTY RSTY-1 000, para micros das li- 
nhas TRS-80, TRS-80 Color, COMMODORE e APPLE, alim dos 
programas de CW e R TTY distribuidos com as respect ivas inter- 
faces para a linha Sinclair e jd gravados em cartuchos - 4 sd en- 
caixar o cartucho e o programa entra em ex ecu f do/ Parabins ao 
Rena to e ao Sinisio, e os votos de que continuem a nos brindar 
com essas maravilhas eletronicas. 

Antes de encerrar, desejo registrar o transcurso, a 5 de maio, 
data de nascimento do Marechal Candido Mariano da Silva Ron- 
don, do Dia Mundial das Telecomunicafdes. Ati a prOxima, tudo 
de bom, e nao deixem de prestigiar o nosso espafo. HPE CUAGN 
73 ESGL FMPY1DWM. 



A RODADA MS e coordenada por PY1DWM - Roberto Quito de 
Sant Anna. Qualquer correspondence e/ou cola bora f do deve ser 
enviada aos seus cuidados, para a Av. Presidente Wilson, 165,grupo 
1210, CEP 20030, Rio de Janeiro, RJ. Contatosdiretosvm Rodada 
do Micro (7097 KHz, das 16:00 as 18:00h). Patrulha da Madruga 
da (7055 KHz, das 22:00 ds 23:00h) ou pelo telefone (0243) 
54-3355, ramal 594. 



Lista de materials: 

CI1 - Circuito integrado 555. 

Cl - Capacitor eletroh'tico 220jjF/16V. 

C2 - Capacitor 0,1 pF, ceramica. 

R1 - Resistor 1M Ohm 1/4 Watt. 

R2 - Resistor 5,6 K Ohm 1/4 Watt. 

R3 - Resistor 10 K Ohm 1/4 Watt. 

J1 - Jaque mono comum conforme pluguc P2 do circuito 
provenientc do micro. 

FTE - Alto-falante comum ou fone de 8 Ohms. 

Bateria - quatro pilhas pequenas em serie. 



A 



Erwin Hiibsch Neto tem 19 a nos e 4 radioamador desde 1980. Estuda 
em curso profissionalizante para Ticnico em Eletrdnica e possui um 
TK-85 , procurando utilizi-lo junto a sua estagdo de radioamador , para 
os mais variados serviqos. 
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Microcomputadores 
IBM PC, APPLE, TRS-80 
Nacionais compativeis 
Drives, Impressoras 
Consutte-nos sobre 
Contratos de manutenpfio 



Av. Aim. Barroso, 91 - gr. 1.111 
Tel.: (021) 262-1886 



'apple 



na ADDRESS vocg dcvorci 
qualqucr tipo dc t 

««•• 

Exclusivo metodo de ensino 
UIDEOTliFO que se utiliza da 
mais moderna tecnica VISUAL 
o video-cassete. 

Editpao microcomputarizada. 
Curso de BASIC TOTAL, e de 
APLICATIVOS apple «. 

TURMAS ESPECIAIS 
PARA EMPRESAS 
FAQA SUA RESERVA JA PELOS 
TELEFONES: 

Oil 211-5348 o Oil 212-0370 
ADDRESS 

Video 

Computer 

Connection 



CURSOS. 

HARDWARE - SOFTWARE •» 

CORRESPONDENCIA ou PESSOALMENTE C/AULAS PRATICAS 



ELETRONICA DIGITAL I e II 

► Prdtica em KITs + apostila encadernada 
MICROPROCESSADORES 

280 8086 8000 8066 8088 6502 

- Pratica nos KfTs ZHardware e Banana 86 t 

apostila encadernada. ILj V- 

manutenqAo de 

MICROCOMPUTADORES 
TRS8C-CP500 DGTKJ0 KAJA SYS DATA 

- Prat >ca de manutenplo com ao fobc a do t 
eqjipamentos + apowia encadernada - 
esduema de todoi os comoatadores. 
MANUTENCAO DE PERIFERICOS 
DRIVES IMPRESSORAS - MONITORES 
INTERFACES 

► Pratica de manutenpao com sofisticados 
apareihos + apostila encadernada - 
esquemas dos Perif6ricos. 



► INTRODUQAO & COMPUTAQAO 

► Pratica de manuseio e venficacSo das panes do 
computador e suas unidades + apostila 
encadernada 

BASIC BASICO e AVANQADO 

► Pratica de programaqlo nos computadores da 
’'Hard^rB’* - aposda encadernada 

COBOL PARA MICROCOMPUTADORES 

►Pratica de programapio nos computadores da 
' 'Hardware * + apostiia encadernada. 

ASSEMBLER ZILOGe INTEL 
iZBOeBOBS) 

►Pratica de programs^ nos computadores 
ZHardware - Banana 85 • CP500 • TK83 • DGT100 



ATENCAO: INSCRICOES ABERTAS 

HARDWARE CURSOS - INDUSTRIA DE INTERFACES - ASS. TECNICA 
- COMPONENTES ELETRONICOS 

R. SAMPAIO VIANA, 232 - Rio Comprido - CALL (021 ) 234-7873 - RJ 



COMPUTADORES 
E PERIFERICOS 



UNITRON 

MICROCRAFT 



VENDAS 

LEASING 

PROGRAMAS 

CURSOS 

ASSISTENCIA 

TECNICA 



Av. Mai. Camara. 271 s/loja 101 
Tel: (021) 262-3289 — R.|. 



ALBAMAR 

ELETRONICA ltda. 



FITAS CASSETES 
TAMANHOS 

C5 CIO Cl 5 C20 
C30 e outros 



•FITAS 

MAGNETICAS 

1 200 e 2400 p6s 

• VHS — BETAMAX 

De T5 a T120 
• DISKETTES 
5 1/4 e 8” 



Rua Conde de Leopoldina, 
270-A S8o Cristbvflo — R.J. 
Tels.: (021) 580-6729 
580-8276 



SUCOMP 



MICROCOMPUTADORES 
PROFISSIONAIS EBC 
E PERIFERICOS 

• Onde sua configuracAo mini- 
ma e iguai a maxima dos 
computadores pessoais 



MODEMS TSL 

• Granddo-1275 

• Anaidgicos - Banda Base 

Sincronos — Assmcronos 



SOFTWARE 

• Controle de Restaurants^ 

• Controle de Produtos Agendas 

• Folha/Contabiiidade /Controle 
de Estoaue integrado 






r SUPRIMENTOS 

• DisHetes 8' e 5 1 14 

• Fitas impressoras 

• Discos e Fitas Magneticas 




SUCOMP-COMERCIO E SERVICOS LTDA. 

Av. Marechal Floriano. 143-Gr 701-CEP: 20080-RJ Tel (021) 263-8813 
ATENDEMOS POR REEMBOLSO POSTAL 



CONHEQA A INFORMATICA ATRAVES DOS LIVROS 
DA CIENCIA MODERNA COMPUTAQAO EDITORA. 



assinale as publicaqoes que deseja receber 

Q PALMER — 20 jogos mteligentes em applesott Cr$ 13.500. 
para toda linha apple inclusive TK-2000 

□ ROCHA NETTO — Basic com Programagdo Estruturada 

Para linha Sinclair — CP-200 — TK-85 Cr$ 14 000, 

□ CHIAPPETTA — Wordstar Guia Compilado do UsuAno. 

Para todos os micros que usam CP/M Cr$ 16 000. 

□ MENDES JR — 30 Programas para TRS-80 Color computer e 

Similares Nacionais CP-400. LZ Color 64 e 
Codimex 6809 Cr$ 15 900. 

Nome 

Enderego CEP 

Cidade. Estado 

Juntc cheque nominal a Ciencia Moderna Computa^ao Ltda. 



no' valor de _ 



. e envic seu cupom par, a. 






CIENCIA MODERNA COMPUTAQAO 

Av. Rio Branco, 156 Loja SS 127 (Subsolo) — CEP 20 043 
(Ed. Avenida Central) Tels. 262-5723 — 240-9327 — 

Caixa Postal 2848 20001 — Rio de Janeiro — RJ. 


















dios^ofc 





Envie suas dicas para a Redagao de MICRO 
SISTEMAS na Av. Presidente Wilson, 165 
— grupo 1 21 0. Centro, Rio de Janeiro, RJ. 
CP. 20030 



Linha SINCLAIR 



Cronometro 

Digite este 
pequeno programa e 
ponha ern seu micro 
um cronometro que 
marca minutos e 
segundos. 

Sergio Kocinas - SP 



5 REM CRONOMETRO 
10 CL S 
15 LET M=0 
20 LET S=0 

25 PRINT M? TAB 2- r "z";S 

30 LET S=S+1 

35 PRINT AT 0,3-5 

40 IF S=59 THFN GOTO 60 

45 FOR 1=0 TO 5 

50 NEXT I 

55 GOTO 30 

60 LET S=0 

65 LET M=M+ i 

70 IF M >59 THEN RUN 

75 PRINT AT 0,0 ? M ; TAB 3 ? "0 

80 FOR 1=0 TO 6 

85 NEXT I 

90 GOTO 30 



Linha SINCLAIR 




Linha TRS-80 



Entre direto no BASIC disco 

Ao chamar o BASIC, estando o computador no DOS, s2o feitas duas pergun- 
tas a respcito do numero dc arquivos e da memoria usada. Para respondd-las, 
voce normalmente tecla ENTER para cada uma delas e assim chega-se ao 
BASIC. Para evitar essa passagem, muitas vezes desnecessaria, estando o compu- 
tador no DOS, digite BASIC, tecle a seta para a direita e <ENTER>. O computa- 
dor passara direto para o BASIC DISCO respondendo automaticamente aquelas 
perguntas. 



Jos6 Luiz C3mara - RJ 



Linha COLOR 



Pressione qualquer tecla 

Freqiientemente e necessario interromper o processamento de um programa 
ate que o usuario esteja pronto para continuar. Nesses casos e comum o uso de 
rotinas do tipo: 

5000 PR INT"APERTE QUALQUER TECLA PARA CONTINUAR'' 

5010 A$=INKEY*:IF A$="" THEN 5010 
Quando a quantidade de pausas e tal, que torna-se deselegante ou enfado- 
nho digitar diversas linhas iguais a essa, a solu(^3o e usar o seguinte artificio: 

- Inclua no seu programa uma linha do tipo: 1 PI =44539 (podc ser qualquer 
varidvel): 

toda vez que houver uma pausa, utilize a instru^ao EXEC PI . 

Claudio Costa — RJ 





Reta 


10 CLS 

20 INPUT"DE AS COORDENADAS <Xi,Yi> 
" ; X i , Y 1 

30 INPUT"DE AS COORDENADAS (X2 r Y2> 
"«X2 Y2 

40 FOR I=Xi TO X2 STEP 0.l:SET(I f F 
IX ( ( ( Y2-Y1 )*I+X2*Y1-X1*Y2)/(X2-X1 > 
) > 

50 NEXT I 


Esta pequena dica pcr- 
mite que se trace uma reta 
passando por dois pontos 
representados pelas coor- 
denadas (XI, Yl) e (X2, 
Y2). Para se usar XI maior 
que X2, troque o STEP 
para -0.1 . 


Heriberto Fuertes e AntOnio Ferreira — BA 



Aldo Rodrigues da Costa — MG 










Linha 

SINCLAIR 



Mensagem senoide 

Com esta dica, seu nome rolara 
na tela obedecendo as regras da fun- 
$3o seno: 

10 FOR F=i TO 1000 STEP 3 
20 SCROLL 

30 ^ I ~~ 21 5 c ■» S IN (F/32*P 
50 RUN 

Modifique a linha 30 do progra- 
ma para: 

.8*8*5IN CF); IE 

E possivel criar varias outras 
equates semelhantes, bastando um 
pouco de imagina^ao e raciocinio. 



Marcel o Contart — SP 



Linha TRS-80 



Paineis eletronicos 

Estas duas pequenas dicas simu- 
lam um painel luminoso e rotativo. 
A primeira so funciona em Disk BA- 
SIC, mas pode ser adaptada para o 
BASIC residente retirando-se o co- 
mando DEFFN MS(1) = M1DS (AS, 
I, 2); e substituindo-se todos os 
FNMS (I) das linhas 20, 30 e 40 
para MIDS (A$, I, 2). A linha 60 
funciona como pausa e pode ser al- 
terada. A mensagem deve ter tama- 
nho par e, caso contrario, deve ser 
acrescentado um espa^o no comedo 
ou no Final. 

10 CLSsDEFINTA-Z* CLEAR 1000: DEFFN 
MS ( I > =M IDS < AS , I , 2 > ! AS= "MENSAGEM" 
:A=LEN(AS) :LS=CHRS<143) :P=960+<3 
2-A/2 ) : REM MENSAGEM DEUE TER TAM 
ANHO PAR 

20 F0RI=1T0ASTEP3:A1S=A1S+FNMS< I 
)+LS:NEXT :AiS=LEFTS(AiS r A) 

30 A2S=LEFTS<AS,i)+LS:F0RI=3T0AS 
TEP3 ; A2S=A2S+FNMS ( I ) +LS ! NEXT 
40 FOR I=2T0ASTEP3s A3S=A3t+LS+FNM 
S( I) s NEXT 

50 PRINT 3P, Ait? : GOSUB60 : PR INT3P r 
A2S ; : GOSUB60 s PR INT3P , A3S ; :G0SUB6 
0 : GOT 050 

60 F0RI=iT025:NEXT :RETURN 
70 REM LUZES R0TATIUAS 





Circun feren cias 



Trace uma circunfergncia no vi'deo, onde Reo raio, o X do centro e dado por 



A e o Y do centro por B. 

10 CLS 

20 INPUT"DE 0 R A 10" j R s INPUT"DE 0 X DO CENTRO" j A s INPUT"DE 0 Y DO CENTRO" ?B 
25 CLS 

30 FOR 1*0 TO 360 s SET ( FIX < A+R*C0S< I)) r FIX<B+(R/2)*SIN<I))> sNEXT I 

Heriberto Fuertes Ferreira 






n 



PEEKS ePOKEs 

Indique o endere^o inicial de um programa BASIC: 

PEEK < 25 ) *256+ PEEK ( 26 ) 

Indique o endere^o final de um programa BASIC: 

PEEK ( 27 ) *256+PEEK ( 28 ) 

Indique o endereso de inicio das variaveis STRING: 

PEEK ( 29 ) *256+PEEK ( 32 ) 

Indique o endere^o Final das variaveis STRING: 

PEEK (31 ) *256+PEEI< <32) + i 

Este PEEK retoma um numero menor que 128, se um programa BASIC 
parou devido a um comando END, ou retoma um numero maior ou igual a 
128, se um programa BASIC parou devido a um comando STOP: 

PEEK (6) 

Marcel T. da Fontoura — RJ 







Retire o carater da tela 



Retire da tela o cardter cujo codigo 
se encontra no endere^o 16514 com 
esta pequena rotina de 19 bytes em lin- 
guagem de maquina. 

16514 - 00 2A 0C 40 3A 82 40 01 
D6 02 ED B 1 C0 2B 36 00 
23 18 F7 

Para testar digite: 

10 LET AS="AABBCCDDEEFFGGHHI I JJ 
KKLLMMNNOOPP" 

20 FOR N=0 TO 21 
30 PRINT AT N , 0 ? AS 
40 NEXT N 
50 INPUT CS 



60 POKE 16514 , CODE CS 
70 RAND USR 16515 
80 GOTO 50 

De RUN e digite qualquer cardter, 
presente ou ndo no vi'deo, e observe o 
resultado. Ndo coloque o codigo de 
NEWLINE (118 em decimal ou $76 
em hexa) no endere^o 16514 como 
dado da rotina, pois o arquivo de ima- 
gem ficara confuso e voce fatalmente 
perdera o controle do teclado. 

Claudia Eleone Gomes - RJ 



A segunda dica Simula um painel 
rotativo: 



Linha TRS-80 



10 DEFINTA-Z ! AS= "MENSAGEM" ! A=LEN 
( AS) :P=960+<32-A/2> :CLS 
20 FORI =0T 0A-1SPRINT3P , R IGHTS < At 
,A-I> ? LEFTS (AS, I ) ; 3P , STR INGS < A , 3 
2) ? s FOR J*iT025s NEXT: NEXT SGOTO20 
30 REM R0TACA0 DE STRINGS 



Marcos Portnoi - BA 



Circu/o na tela 



Esta rotina cria um 
circulo, no video, com um 
raio dado. 



100 INPUT'ENTRE RAI0"jRA 

110 CLS!KX=64:KY=23!Q=64+RA 

120 X=ABS(KX-Q) : Y=X#5/7 

130 T =Y*7/5 s IF X >T THEN T=X 

140 FOR HJ=0 TO 2*3.1415 STEP 1/T 

150 Z1=C0S<HJ)*X+KX!Z2=SIN(HJ)*Y+KY 

160 IF Z1<0 OR Z2 >127 OR Z2<0 OR Z2>47 THEN ie 

170 SET (Z1 ,Z2> 

180 NEXT 



Fernando Osvaldo Oliveira Jr. — SC 












Empresa filtada a A SSESPRO. 



(continuaqdo da pdg. 23) 



Cross Read 

no Apple Datamicro 



Software Industrial 

A LABO esta completando seis anos de fundapSo lanpando, em todo 
o pai's, a sua mais nova ferramenta de auxflio a produpao: o PLANCOI 
— Planejamento e Controle Industrial. 

Quarenta por cento dos clientes da LABO s£o industrias, e 6 dentro 
deste contexto que o PLANCOI surge como auxiliar na composipffo dos 
custos e posterior planejamento da produpao. O software i modular, ro- 
da nos minis 8038 e 8043, foi escrito em BASIC e i flexi'vel a ponto de 
ser adaptivel a cada caso. 

A PLANCOI visa industrias de midio e grande porte, contando com 
mbdulos como Administrapao de Materiais; Planejamento e Controle de 
ProdupSo e Custo Industrial. O enderepo da LABO i: Av. Naples Uni- 
das, 13797 bloco II 17? andar tel: (011) 533-1 144 (SP). 



Folha de 
Pagamento 

A ESCOM, de Belo Horizonte 
(MG), esta comercializando uma 
folha para micros com CP/M, 64 
Kb, duas unidades de disco flexf- 
vel e impressora. O programa foi 
escrito em COBOL 80, vem acom- 
panhado de manual e permite o 
controle de 250 funcion£rios na 
sua confiauracao mi'nima. 

A ESCOM garante que o soft- 
ware foi adaptado 3s leis brasilei- 
ras, gerenciando mensalistas, se- 
manalistas ou autdnomos. O ende- 
repo da empresa 6 Rua Espfrito 
Santo 1204/307, tel. (031) 226- 
1023, MG. 



Ivanita II 



Depois do sucesso da placa 
Ivanita, que permite a acentuapao 
nos micros da I inha Apple, a em- 
presa Ivanita esta lanpando uma 
segunda versao da placa, na qual 
as letras maiusculas ja aparecem 
acentuadas no vi'deo. A Ivanita II 
tamWm trabalha com CP/M 80 
colunas, BASIC e Pascal. A nova 
placa ja esta pronta porim esta 
recebendo uma protepSo especial 
contra cbpias, e sera colocada no 
mercado no final deste mfis. A 
Ivanita II podera ser encontrada 
nas lojas especial izadas e seu pre- 
po seri de 15 ORTN. Havendo 
necessidade de troca da Eprom da 
impressora, isso j£ esta inclui'do 
no prepo 



A Data Shopping colocou no- 
vo software no mercado, desta vez 
direcionado a area de esportes, 
mais especificamente o motociclis- 
mo. O sistema processa dados 
(tempos, penal idades, largada, 
non-stop etc. dos enduros de re- 
gularidade, emitindo relatbrios co- 
mo relapao geral de pilotos; rela- 
tbrio de largada; classificapao final 
e desempenho individual na pro- 
va. Seu prepo fica em torno de 
90 ORTN, e para maiores infor- 
mapOes con tactar a Data Shopping, 
que fica na rua Maciel Pinheiro, 
365 — 1? andar, Centro. Campina 
Grande, Parafoa. Tel: (083) 321- 
9353. 



A Palm Informatica, de Curiti- 
ba, empresa que hi oito meses 
produz os cartuchos usados no vi- 
deogame Atari, esta lanpando uma 
placa sintetizadora de voz para 
micros compati'veis com Apple. O 
sintetizador possui duas oppdes 
para funcionamento, permitindo 
que as palavras sejam ditas em in- 
glis ou portuguis, em ambos os 
casos com a pronuncia correta. 

Alim disso, a placa possui um 



A Datamicro planeja para o 
misde agostodoiscursosespeciais: 
Micro-Mulher e Sistemas de Ge- 
renciamento de Bancos de Dados. 
Micro-Mulher comepa dia 06 
e custa Cr$ 185 mil cruzeiros, 
com carga horiria de vinte horas 
e turmas de oito alunas. Sistemas 
de Gerenciamento requer conheci- 
mento de linguagem de alto m'vel, 
operapao de um CP-500 e nopdes 
de CP/M. Sao 48 horas/aula divi- 
didas em dois mbdulos, com um 
prepo total de Cr$ 590 mil. 

A Datamicro fica em Ipanema 
na Rua Visconde de Piraji, 547/ 
211 - tel. (021) 511-0395 Rio de 
Janeiro (RJ). 



minidicionirio de tres mil pala- 
vras para tradupSes do portuguis 
para o inglis. O sintetizador vem 
acompanhado de manual e soft- 
ware e custa Cr$ 330 mil. A co- 
mercializapao i feita via reembol- 
so, e os pedidos devem ser enca- 
minhados para Palm Informitica, 
rua Augusto Stellfeld, 1.314 — 
Curitiba - Parana, CEP 80.000. 
Outrasinformapoespelotel.:(041) ■ 
224-5946. m 



Sintetizador de Voz 





h'az a Folha de Pagumenio de sua empresa, 
emitindo relaidrios como Guia de I A PAS, 
Guia de FGTS, Relapao de Empregados, 

Re Un ao para I.R . . ReUn ao para Banco, 

In forme de Rendimentos. A cum u /ados 
Anuais. RAIS e Reciho de Pagamento. 

A folha pode ser semanal ou mensal. 

As tabe/as sao modificadas /ndo propria 
usudrio. 

Permite tamhem. adiantamentos de sa/ario. 
rea juste sa/aridl. aheracocs de acumu/ados e 
outras funcoes que agi/izem o processamento 
da Folha de Pagamento da empresa. 




A Contahi/idade de um mes em 2 Horas! 

Fste Sistema permite o cadastramento de 
historicos padronizados e de piano de comas 
com ate 5 nfveis. 

Emile Diiirio, Razao. Balancete. Ikilanco. 
Demonstra^ao de Resu/tados, Demonstracao 
de Lucros e Prejuizos acumu/ados. Listagem 
por centra de custo e extrato de contas. entre 
outras funcoes. 




Controla o estoque de liens com 
Especiftca^ao. Estoque Minima, Unidade. 
Fornecedor. I .ocaliza^ao e outras 
inform a^des relacionadas no item como 
Custo Medio, Entradas e Saidas no periodo, 
etc. 

Fornece Uslagens Geral e Parcial dos 
produtos, Listagem Fisico- Financeira, 
Listagem dos produtos ahaixo do estoque 
minima. Lista de Precos e Eli que t as. entre 
outras. 

Admit e tamhem. Rea juste de Precos. 

Aherai ao de Dados e Exc/usao de Produtos. 



Compativeis com as linhas TR5-80 e Apple 

V 




I _ m Av ' R io Branco, 45 - sala J.3U 

I /1/tema/ Rk> de Janeiro - CEP 20. 090 

Um jeiro fdcil de resolver Tels.: (021)263-1241 e 233-0615 
os problemas de seu computador . 



-A. 



Eslaremos presenles na Feira de Informatica da SUCESU 
— de 23 a 29 de setembro em Sao Paulo , no Pavilhao 
A nexo do A nhembi. Visile-nos. 






J 








fMCROCOMPUTADOR=COLOR 




VOCS TEM QUE ESTAR PREPARADO 
PARA SE DESENVOLVER COM OS 
NOVOS TEMPOS QUE ESTAO Af. E 0 
CP 400 COLOR £ A CHAVE DESSA 
EVOLUQAO PESSOAL E PROF1SSIONAL. 








PORQUS? 

PORQUEO 
CP 400 COLORS 
UMCOMPUTADOR 
PESSOAL DE 
TEMPO INTEGRAL: 

Cm PARA A 
FAMfiJA TODA, 0 D1A INTEffiO. 

NA HORA DE SE DIVERT®, POR 
EXEMPLO, £ MUITO MA1S EMOCIO- 
NANTE PORQUE, AL£M DE OFERECER 
JOGOS INSDITOS, £ 0 (JN1CO COM 
2 JOYSTICKS ANALQGICOS DE ALTA 
SENSIBILIDADE. QUE PERMITEM MO- 
VTMENTAR AS LMAGENS EM TODAS 
AS DTREQOES, MESMO. NA HORA 
DETRABALHAR E ESTUDAR, 0 CP 400 
COLOR MOSTRA 0 SEU LADO SSRIO: 
MEMOR1A EXPANSfVEL, PORTA PARA 
COMUN1CAQAO DE DADOS. SAlDA 
PARA IMPRESSORA, E UMA QTIMA 
NITDEZ COM IMAGENS COLORIDAS. 

COMO SE TUDO ISSO NAO 
BASTASSE, A PROLOG1CA AINDA OFE- 
RECE A GARANTIA DE QUALIDADE 
DE QUEM £ UDER NA TECNOLOGIA 
DE COMPUTADORES, E 0 PREQO 
MAIS ACESSfVEL NA CATEGORIA. 

NUMA FRASE: SEVOCS NAO 
QUISER CHEGAR ATRASADO AO FU- 
TURO, COMPRE SEU CP 400 COLOR 
IMEDIATAMENTE. 

EMOQAO E CSTELIGENCIA NUM 
EQUIPAMENTOS6. 

• MICROPROCESSADOR: 6809ECOM 



ESTRUTURA INTERNA DE 
16 BITS E CLOCK DE FREQUSNCIA 
DE ATS 1.6 MHZ. 

• possibiutaousodeatS 

9 CORES, E TEM UMA RESOLUQAO 
GRAHCA SUPERIOR A 49.000 
PONTOS. 

• MEMOR1A ROM: 16K BYTES 
PARA SISTEMA OPERACIONAL E 
INTERPRETADOR BASIC. 

• MEMOR1A RAM: 0 CP 400 COLOR 
ESTA DISPONiVU EM DOIS MODELOS: 

• MODELO 16K: 
EXPANSfVEL A 
64K BYTES. 

• MODELO 64K: 

ATS 64K BYTES 
QUANDOUSADO 
COMO NOVO 
DISK-SYSTEM, 

CP 450. 

•0 CP 400 COLOR DISPOEDE 
CARTUCHOS DE PROGRAMAS COM 
16K BYTES DECAPACIDADE, 

QUE PERMITEM 0 CARREGAMENTO 
LNSTANTAN'EO DE JOGOS, 
LLNGUAGENS E APUCATIVOS COMO: 
BANCO DE DADOS, PLANILHAS 
DE CALCULO, EDITORES DE TECTOS 
APUCATIVOS FINANCEIROS, 
APUCATIV'OS GRAFICOS, ETC. 

•SAIDA SERIAL RS 232 C QUE 
PERMITE COMUNICAQAO DE DADOS. 
ALSM DO QUE, ATRAVSS DESTA 
PORTA, VOCS PODE CONECTAR 



QUALQUER IMPRESSORA SERIAL 
OU ATE MESMO 
FORMAR UMA 
REDEDETRABA- 
LHOCOM 
OUTROS MICROS 

•PORTA PARA 
GRAVADORCAS- 
SETE COM GRAVAQAO E LE1TURA 
DE ALTA VELOCIDADE. 

• SAIDAS PARA TV EM CORES E MONI- 
TOR PROFISSIONAL. 

• DUAS ENTRADAS PAH\ JOYSTICKS 
ANALQGICOS QUE OFERECEM 
LNFINITAS POSIQOES NA TELA, 
ENQUANTO OUTROS T£M SOMENTE 
8DIREQOES. 

• AMPLA BIBUOTECA DE SOFTWARE 
JADISPONfVEL. 

• ALLMENTAQAO: 110-220 VOLTS. 

\TJA, TESTE E COMPRE 
SEU CP 400 COLOR NOS MAGAZINES 
E REVENDEDORES PROLOGICA. 

TECNOLOGIA ■■■ 
PROLOGICA ■■■ 




COMPUTADORES PESSOAIS 

RUA PTOLOMEU. 650 VILA SOCORRO 
SAO PAULO. S P CEP 04762 
FONES (PBX)523-993&$480749K484540 







QUEM TEM UM,TEM FUTURO. 







Fitiada a ABICOMP 



A Microdigital 
larp no Brasil 
o micro pessoal 
demaiorsucesso 
nomunda 

A partir de agora a historia dos 
micros pessoais vai ser contada em duas 
partes: antes e depois do TK 90X. 

0 TK 90X e, simplesmente, o unico 
micro pessoal lancado no Brasil que 
merece a classificacao de "software 
machine": urn caso raro de micro que 
pela sua facilidade de uso, grandes 
recursos e preco acesslvel recebeu a 




atencao dos criadores de programas e 
perifericos em todo o mundo. 

Para voce ter uma ideia, existem 
mais de 2 mil programas, 70 livros, 30 
perifericos e inumeras 
revistas de usuarios disponiveis 
para ele internacionalmente. 



E aqui o TK 90X ja sai com mais de 
100 programas, enquanto outros estao 
em fase final de desenvolvimento para 
Ihe dar mais opcoes para trabalhar, 
aprender ou se divertir que com qualquer 
outro micro. 

0 TK 90X tern duas versoes de 
memoria (de 16 ou 48 K), imagem de 
alta resolucao grafica com 8 cores, 
carregamento rapido de programas 
(controlavel pelo proprio monitor), som 
pela TV, letras maiusculas e minusculas 
e ainda uma exclusividade: acentuacao 
em portugues. 

Faca o seu programa: peca ja uma 
demonstracao do novo TK 90X. 
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